BBS in a Box 15

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / QuickTime / QT Tools / QuickTime Interfacing.sit / QuickTime Interfacing / Movies.p < prev next >
MacBinary | 1992-10-20 | 43.4 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Movies.p
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	ZX81 Sinclair BASIC `(image/sinclairBASIC)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	bsdiff patch `(other/bsdiffPatch)`	ext	Unsupported
`1%`	dexvert	imgdiff patch `(other/imgdiffPatch)`	ext	Unsupported
`1%`	dexvert	WSUS Patch Storage File `(other/wsusPatchStorageFile)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Tue Oct 20 22:34:24 1992, modified Tue Oct 20 22:34:24 1992, creator 'MPS ', type ASCII, 43897 bytes "Movies.p" , at 0xabf9 335 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 4d 6f 76 69 65 73 | 2e 70 00 00 00 00 00 00 |..Movies|.p......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 ab 79 00 | 00 01 4f a7 0a 72 30 a7 |......y.|..O..r0.|
|00000060| 0a 72 30 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.r0.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 88 c7 00 00 |........|........|
|00000080| 0d 7b 0d 43 72 65 61 74 | 65 64 3a 20 57 65 64 6e |.{.Creat|ed: Wedn|
|00000090| 65 73 64 61 79 2c 20 41 | 75 67 75 73 74 20 31 34 |esday, A|ugust 14|
|000000a0| 2c 20 31 39 39 31 20 61 | 74 20 31 32 3a 33 36 20 |, 1991 a|t 12:36 |
|000000b0| 50 4d 0d 20 4d 6f 76 69 | 65 73 2e 70 0d 20 50 61 |PM. Movi|es.p. Pa|
|000000c0| 73 63 61 6c 20 49 6e 74 | 65 72 66 61 63 65 20 74 |scal Int|erface t|
|000000d0| 6f 20 74 68 65 20 4d 61 | 63 69 6e 74 6f 73 68 20 |o the Ma|cintosh |
|000000e0| 4c 69 62 72 61 72 69 65 | 73 0d 0d 20 20 43 6f 70 |Librarie|s..  Cop|
|000000f0| 79 72 69 67 68 74 20 41 | 70 70 6c 65 20 43 6f 6d |yright A|pple Com|
|00000100| 70 75 74 65 72 2c 20 49 | 6e 63 2e 20 31 39 39 31 |puter, I|nc. 1991|
|00000110| 0d 20 20 41 6c 6c 20 72 | 69 67 68 74 73 20 72 65 |.  All r|ights re|
|00000120| 73 65 72 76 65 64 0d 0d | 7d 0d 0d 0d 7b 24 49 46 |served..|}...{$IF|
|00000130| 43 20 55 4e 44 45 46 49 | 4e 45 44 20 55 73 69 6e |C UNDEFI|NED Usin|
|00000140| 67 49 6e 63 6c 75 64 65 | 73 7d 0d 7b 24 53 45 54 |gInclude|s}.{$SET|
|00000150| 43 20 55 73 69 6e 67 49 | 6e 63 6c 75 64 65 73 20 |C UsingI|ncludes |
|00000160| 3a 3d 20 30 7d 0d 7b 24 | 45 4e 44 43 7d 0d 0d 7b |:= 0}.{$|ENDC}..{|
|00000170| 24 49 46 43 20 4e 4f 54 | 20 55 73 69 6e 67 49 6e |$IFC NOT| UsingIn|
|00000180| 63 6c 75 64 65 73 7d 0d | 20 55 4e 49 54 20 4d 6f |cludes}.| UNIT Mo|
|00000190| 76 69 65 73 3b 0d 20 49 | 4e 54 45 52 46 41 43 45 |vies;. I|NTERFACE|
|000001a0| 0d 7b 24 45 4e 44 43 7d | 0d 0d 7b 24 49 46 43 20 |.{$ENDC}|..{$IFC |
|000001b0| 55 4e 44 45 46 49 4e 45 | 44 20 55 73 69 6e 67 4d |UNDEFINE|D UsingM|
|000001c0| 6f 76 69 65 73 7d 0d 7b | 24 53 45 54 43 20 55 73 |ovies}.{|$SETC Us|
|000001d0| 69 6e 67 4d 6f 76 69 65 | 73 20 3a 3d 20 31 7d 0d |ingMovie|s := 1}.|
|000001e0| 0d 7b 24 49 2b 7d 0d 7b | 24 53 45 54 43 20 4d 6f |.{$I+}.{|$SETC Mo|
|000001f0| 76 69 65 73 49 6e 63 6c | 75 64 65 73 20 3a 3d 20 |viesIncl|udes := |
|00000200| 55 73 69 6e 67 49 6e 63 | 6c 75 64 65 73 7d 0d 7b |UsingInc|ludes}.{|
|00000210| 24 53 45 54 43 20 55 73 | 69 6e 67 49 6e 63 6c 75 |$SETC Us|ingInclu|
|00000220| 64 65 73 20 3a 3d 20 31 | 7d 0d 7b 24 49 46 43 20 |des := 1|}.{$IFC |
|00000230| 55 4e 44 45 46 49 4e 45 | 44 20 55 73 69 6e 67 51 |UNDEFINE|D UsingQ|
|00000240| 75 69 63 6b 44 72 61 77 | 7d 0d 7b 24 49 20 24 24 |uickDraw|}.{$I $$|
|00000250| 53 68 65 6c 6c 28 50 49 | 6e 74 65 72 66 61 63 65 |Shell(PI|nterface|
|00000260| 73 29 51 75 69 63 6b 44 | 72 61 77 2e 70 7d 0d 7b |s)QuickD|raw.p}.{|
|00000270| 24 45 4e 44 43 7d 0d 7b | 24 49 46 43 20 55 4e 44 |$ENDC}.{|$IFC UND|
|00000280| 45 46 49 4e 45 44 20 55 | 73 69 6e 67 41 6c 69 61 |EFINED U|singAlia|
|00000290| 73 65 73 7d 0d 7b 24 49 | 20 24 24 53 68 65 6c 6c |ses}.{$I| $$Shell|
|000002a0| 28 50 49 6e 74 65 72 66 | 61 63 65 73 29 41 6c 69 |(PInterf|aces)Ali|
|000002b0| 61 73 65 73 2e 70 7d 0d | 7b 24 45 4e 44 43 7d 0d |ases.p}.|{$ENDC}.|
|000002c0| 7b 24 49 46 43 20 55 4e | 44 45 46 49 4e 45 44 20 |{$IFC UN|DEFINED |
|000002d0| 55 73 69 6e 67 45 76 65 | 6e 74 73 7d 0d 7b 24 49 |UsingEve|nts}.{$I|
|000002e0| 20 24 24 53 68 65 6c 6c | 28 50 49 6e 74 65 72 66 | $$Shell|(PInterf|
|000002f0| 61 63 65 73 29 45 76 65 | 6e 74 73 2e 70 7d 0d 7b |aces)Eve|nts.p}.{|
|00000300| 24 45 4e 44 43 7d 0d 7b | 24 49 46 43 20 55 4e 44 |$ENDC}.{|$IFC UND|
|00000310| 45 46 49 4e 45 44 20 55 | 73 69 6e 67 43 6f 6d 70 |EFINED U|singComp|
|00000320| 6f 6e 65 6e 74 73 7d 0d | 7b 24 49 20 24 24 53 68 |onents}.|{$I $$Sh|
|00000330| 65 6c 6c 28 50 49 6e 74 | 65 72 66 61 63 65 73 29 |ell(PInt|erfaces)|
|00000340| 43 6f 6d 70 6f 6e 65 6e | 74 73 2e 70 7d 0d 7b 24 |Componen|ts.p}.{$|
|00000350| 45 4e 44 43 7d 0d 7b 24 | 49 46 43 20 55 4e 44 45 |ENDC}.{$|IFC UNDE|
|00000360| 46 49 4e 45 44 20 55 73 | 69 6e 67 49 6d 61 67 65 |FINED Us|ingImage|
|00000370| 43 6f 6d 70 72 65 73 73 | 69 6f 6e 7d 0d 7b 24 49 |Compress|ion}.{$I|
|00000380| 20 24 24 53 68 65 6c 6c | 28 50 49 6e 74 65 72 66 | $$Shell|(PInterf|
|00000390| 61 63 65 73 29 49 6d 61 | 67 65 43 6f 6d 70 72 65 |aces)Ima|geCompre|
|000003a0| 73 73 69 6f 6e 2e 70 7d | 0d 7b 24 45 4e 44 43 7d |ssion.p}|.{$ENDC}|
|000003b0| 0d 7b 24 49 46 43 20 55 | 4e 44 45 46 49 4e 45 44 |.{$IFC U|NDEFINED|
|000003c0| 20 55 73 69 6e 67 4d 65 | 6e 75 73 7d 0d 7b 24 49 | UsingMe|nus}.{$I|
|000003d0| 20 24 24 53 68 65 6c 6c | 28 50 49 6e 74 65 72 66 | $$Shell|(PInterf|
|000003e0| 61 63 65 73 29 4d 65 6e | 75 73 2e 70 7d 0d 7b 24 |aces)Men|us.p}.{$|
|000003f0| 45 4e 44 43 7d 0d 0d 7b | 24 53 45 54 43 20 55 73 |ENDC}..{|$SETC Us|
|00000400| 69 6e 67 49 6e 63 6c 75 | 64 65 73 20 3a 3d 20 4d |ingInclu|des := M|
|00000410| 6f 76 69 65 73 49 6e 63 | 6c 75 64 65 73 7d 0d 0d |oviesInc|ludes}..|
|00000420| 43 4f 4e 53 54 0d 67 65 | 73 74 61 6c 74 51 75 69 |CONST.ge|staltQui|
|00000430| 63 6b 54 69 6d 65 20 3d | 20 27 71 74 69 6d 27 3b |ckTime =| 'qtim';|
|00000440| 0d 0d 4d 6f 76 69 65 46 | 69 6c 65 54 79 70 65 20 |..MovieF|ileType |
|00000450| 3d 20 27 4d 6f 6f 56 27 | 3b 0d 0d 56 69 64 65 6f |= 'MooV'|;..Video|
|00000460| 4d 65 64 69 61 54 79 70 | 65 20 3d 20 27 76 69 64 |MediaTyp|e = 'vid|
|00000470| 65 27 3b 0d 53 6f 75 6e | 64 4d 65 64 69 61 54 79 |e';.Soun|dMediaTy|
|00000480| 70 65 20 3d 20 27 73 6f | 75 6e 27 3b 0d 0d 44 6f |pe = 'so|un';..Do|
|00000490| 54 68 65 52 69 67 68 74 | 54 68 69 6e 67 20 3d 20 |TheRight|Thing = |
|000004a0| 30 3b 0d 0d 6b 46 75 6c | 6c 56 6f 6c 75 6d 65 20 |0;..kFul|lVolume |
|000004b0| 3d 20 24 31 30 30 3b 09 | 09 09 09 7b 20 38 2e 38 |= $100;.|...{ 8.8|
|000004c0| 20 66 6f 72 6d 61 74 20 | 7d 0d 6b 4e 6f 56 6f 6c | format |}.kNoVol|
|000004d0| 75 6d 65 20 3d 20 30 3b | 0d 0d 0d 54 59 50 45 0d |ume = 0;|...TYPE.|
|000004e0| 4d 6f 76 69 65 20 3d 20 | 5e 4d 6f 76 69 65 52 65 |Movie = |^MovieRe|
|000004f0| 63 6f 72 64 3b 0d 4d 6f | 76 69 65 52 65 63 6f 72 |cord;.Mo|vieRecor|
|00000500| 64 20 3d 20 52 45 43 4f | 52 44 0d 20 64 61 74 61 |d = RECO|RD. data|
|00000510| 3a 20 41 52 52 41 59 20 | 5b 30 2e 2e 30 5d 20 4f |: ARRAY |[0..0] O|
|00000520| 46 20 4c 4f 4e 47 49 4e | 54 3b 0d 20 45 4e 44 3b |F LONGIN|T;. END;|
|00000530| 0d 0d 54 72 61 63 6b 20 | 3d 20 5e 54 72 61 63 6b |..Track |= ^Track|
|00000540| 52 65 63 6f 72 64 3b 0d | 54 72 61 63 6b 52 65 63 |Record;.|TrackRec|
|00000550| 6f 72 64 20 3d 20 52 45 | 43 4f 52 44 0d 20 64 61 |ord = RE|CORD. da|
|00000560| 74 61 3a 20 41 52 52 41 | 59 20 5b 30 2e 2e 30 5d |ta: ARRA|Y [0..0]|
|00000570| 20 4f 46 20 4c 4f 4e 47 | 49 4e 54 3b 0d 20 45 4e | OF LONG|INT;. EN|
|00000580| 44 3b 0d 0d 4d 65 64 69 | 61 20 3d 20 5e 4d 65 64 |D;..Medi|a = ^Med|
|00000590| 69 61 52 65 63 6f 72 64 | 3b 0d 4d 65 64 69 61 52 |iaRecord|;.MediaR|
|000005a0| 65 63 6f 72 64 20 3d 20 | 52 45 43 4f 52 44 0d 20 |ecord = |RECORD. |
|000005b0| 64 61 74 61 3a 20 41 52 | 52 41 59 20 5b 30 2e 2e |data: AR|RAY [0..|
|000005c0| 30 5d 20 4f 46 20 4c 4f | 4e 47 49 4e 54 3b 0d 20 |0] OF LO|NGINT;. |
|000005d0| 45 4e 44 3b 0d 0d 55 73 | 65 72 44 61 74 61 20 3d |END;..Us|erData =|
|000005e0| 20 5e 55 73 65 72 44 61 | 74 61 52 65 63 6f 72 64 | ^UserDa|taRecord|
|000005f0| 3b 0d 55 73 65 72 44 61 | 74 61 52 65 63 6f 72 64 |;.UserDa|taRecord|
|00000600| 20 3d 20 52 45 43 4f 52 | 44 0d 20 64 61 74 61 3a | = RECOR|D. data:|
|00000610| 20 41 52 52 41 59 20 5b | 30 2e 2e 30 5d 20 4f 46 | ARRAY [|0..0] OF|
|00000620| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 20 45 4e 44 3b 0d | LONGINT|;. END;.|
|00000630| 0d 54 72 61 63 6b 45 64 | 69 74 53 74 61 74 65 20 |.TrackEd|itState |
|00000640| 3d 20 5e 54 72 61 63 6b | 45 64 69 74 53 74 61 74 |= ^Track|EditStat|
|00000650| 65 52 65 63 6f 72 64 3b | 0d 54 72 61 63 6b 45 64 |eRecord;|.TrackEd|
|00000660| 69 74 53 74 61 74 65 52 | 65 63 6f 72 64 20 3d 20 |itStateR|ecord = |
|00000670| 52 45 43 4f 52 44 0d 20 | 64 61 74 61 3a 20 41 52 |RECORD. |data: AR|
|00000680| 52 41 59 20 5b 30 2e 2e | 30 5d 20 4f 46 20 4c 4f |RAY [0..|0] OF LO|
|00000690| 4e 47 49 4e 54 3b 0d 20 | 45 4e 44 3b 0d 0d 4d 6f |NGINT;. |END;..Mo|
|000006a0| 76 69 65 45 64 69 74 53 | 74 61 74 65 20 3d 20 5e |vieEditS|tate = ^|
|000006b0| 4d 6f 76 69 65 45 64 69 | 74 53 74 61 74 65 52 65 |MovieEdi|tStateRe|
|000006c0| 63 6f 72 64 3b 0d 4d 6f | 76 69 65 45 64 69 74 53 |cord;.Mo|vieEditS|
|000006d0| 74 61 74 65 52 65 63 6f | 72 64 20 3d 20 52 45 43 |tateReco|rd = REC|
|000006e0| 4f 52 44 0d 20 64 61 74 | 61 3a 20 41 52 52 41 59 |ORD. dat|a: ARRAY|
|000006f0| 20 5b 30 2e 2e 30 5d 20 | 4f 46 20 4c 4f 4e 47 49 | [0..0] |OF LONGI|
|00000700| 4e 54 3b 0d 20 45 4e 44 | 3b 0d 0d 0d 54 69 6d 65 |NT;. END|;...Time|
|00000710| 56 61 6c 75 65 20 3d 20 | 4c 4f 4e 47 49 4e 54 3b |Value = |LONGINT;|
|00000720| 0d 54 69 6d 65 53 63 61 | 6c 65 20 3d 20 4c 4f 4e |.TimeSca|le = LON|
|00000730| 47 49 4e 54 3b 0d 0d 54 | 69 6d 65 42 61 73 65 20 |GINT;..T|imeBase |
|00000740| 3d 20 5e 54 69 6d 65 42 | 61 73 65 52 65 63 6f 72 |= ^TimeB|aseRecor|
|00000750| 64 3b 0d 54 69 6d 65 42 | 61 73 65 52 65 63 6f 72 |d;.TimeB|aseRecor|
|00000760| 64 20 3d 20 52 45 43 4f | 52 44 0d 20 64 61 74 61 |d = RECO|RD. data|
|00000770| 3a 20 41 52 52 41 59 20 | 5b 30 2e 2e 30 5d 20 4f |: ARRAY |[0..0] O|
|00000780| 46 20 4c 4f 4e 47 49 4e | 54 3b 0d 20 45 4e 44 3b |F LONGIN|T;. END;|
|00000790| 0d 0d 51 54 43 61 6c 6c | 42 61 63 6b 20 3d 20 5e |..QTCall|Back = ^|
|000007a0| 43 61 6c 6c 42 61 63 6b | 52 65 63 6f 72 64 3b 0d |CallBack|Record;.|
|000007b0| 43 61 6c 6c 42 61 63 6b | 52 65 63 6f 72 64 20 3d |CallBack|Record =|
|000007c0| 20 52 45 43 4f 52 44 0d | 20 64 61 74 61 3a 20 41 | RECORD.| data: A|
|000007d0| 52 52 41 59 20 5b 30 2e | 2e 30 5d 20 4f 46 20 4c |RRAY [0.|.0] OF L|
|000007e0| 4f 4e 47 49 4e 54 3b 0d | 20 45 4e 44 3b 0d 0d 49 |ONGINT;.| END;..I|
|000007f0| 6e 74 36 34 20 3d 20 52 | 45 43 4f 52 44 0d 20 68 |nt64 = R|ECORD. h|
|00000800| 69 3a 20 4c 4f 4e 47 49 | 4e 54 3b 0d 20 6c 6f 3a |i: LONGI|NT;. lo:|
|00000810| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 20 45 4e 44 3b 0d | LONGINT|;. END;.|
|00000820| 0d 54 69 6d 65 52 65 63 | 6f 72 64 20 3d 20 52 45 |.TimeRec|ord = RE|
|00000830| 43 4f 52 44 0d 20 76 61 | 6c 75 65 3a 20 49 6e 74 |CORD. va|lue: Int|
|00000840| 36 34 3b 0d 20 73 63 61 | 6c 65 3a 20 54 69 6d 65 |64;. sca|le: Time|
|00000850| 53 63 61 6c 65 3b 0d 20 | 62 61 73 65 3a 20 54 69 |Scale;. |base: Ti|
|00000860| 6d 65 42 61 73 65 3b 0d | 20 45 4e 44 3b 0d 0d 53 |meBase;.| END;..S|
|00000870| 61 6d 70 6c 65 44 65 73 | 63 72 69 70 74 69 6f 6e |ampleDes|cription|
|00000880| 50 74 72 20 3d 20 5e 53 | 61 6d 70 6c 65 44 65 73 |Ptr = ^S|ampleDes|
|00000890| 63 72 69 70 74 69 6f 6e | 3b 0d 53 61 6d 70 6c 65 |cription|;.Sample|
|000008a0| 44 65 73 63 72 69 70 74 | 69 6f 6e 48 61 6e 64 6c |Descript|ionHandl|
|000008b0| 65 20 3d 20 5e 53 61 6d | 70 6c 65 44 65 73 63 72 |e = ^Sam|pleDescr|
|000008c0| 69 70 74 69 6f 6e 50 74 | 72 3b 0d 53 61 6d 70 6c |iptionPt|r;.Sampl|
|000008d0| 65 44 65 73 63 72 69 70 | 74 69 6f 6e 20 3d 20 52 |eDescrip|tion = R|
|000008e0| 45 43 4f 52 44 0d 20 64 | 65 73 63 53 69 7a 65 3a |ECORD. d|escSize:|
|000008f0| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 20 64 61 74 61 46 | LONGINT|;. dataF|
|00000900| 6f 72 6d 61 74 3a 20 4c | 4f 4e 47 49 4e 54 3b 0d |ormat: L|ONGINT;.|
|00000910| 20 45 4e 44 3b 0d 0d 53 | 6f 75 6e 64 44 65 73 63 | END;..S|oundDesc|
|00000920| 72 69 70 74 69 6f 6e 50 | 74 72 20 3d 20 5e 53 6f |riptionP|tr = ^So|
|00000930| 75 6e 64 44 65 73 63 72 | 69 70 74 69 6f 6e 3b 0d |undDescr|iption;.|
|00000940| 53 6f 75 6e 64 44 65 73 | 63 72 69 70 74 69 6f 6e |SoundDes|cription|
|00000950| 48 61 6e 64 6c 65 20 3d | 20 5e 53 6f 75 6e 64 44 |Handle =| ^SoundD|
|00000960| 65 73 63 72 69 70 74 69 | 6f 6e 50 74 72 3b 0d 53 |escripti|onPtr;.S|
|00000970| 6f 75 6e 64 44 65 73 63 | 72 69 70 74 69 6f 6e 20 |oundDesc|ription |
|00000980| 3d 20 52 45 43 4f 52 44 | 0d 20 64 65 73 63 53 69 |= RECORD|. descSi|
|00000990| 7a 65 3a 20 4c 4f 4e 47 | 49 4e 54 3b 0d 20 64 61 |ze: LONG|INT;. da|
|000009a0| 74 61 46 6f 72 6d 61 74 | 3a 20 4c 4f 4e 47 49 4e |taFormat|: LONGIN|
|000009b0| 54 3b 0d 20 72 65 73 76 | 64 31 3a 20 4c 4f 4e 47 |T;. resv|d1: LONG|
|000009c0| 49 4e 54 3b 0d 20 72 65 | 73 76 64 32 3a 20 49 4e |INT;. re|svd2: IN|
|000009d0| 54 45 47 45 52 3b 0d 20 | 64 61 74 61 52 65 66 49 |TEGER;. |dataRefI|
|000009e0| 6e 64 65 78 3a 20 49 4e | 54 45 47 45 52 3b 0d 20 |ndex: IN|TEGER;. |
|000009f0| 76 65 72 73 69 6f 6e 3a | 20 49 4e 54 45 47 45 52 |version:| INTEGER|
|00000a00| 3b 0d 20 72 65 76 6c 65 | 76 65 6c 3a 20 49 4e 54 |;. revle|vel: INT|
|00000a10| 45 47 45 52 3b 0d 20 76 | 65 6e 64 6f 72 3a 20 4c |EGER;. v|endor: L|
|00000a20| 4f 4e 47 49 4e 54 3b 0d | 20 6e 75 6d 43 68 61 6e |ONGINT;.| numChan|
|00000a30| 6e 65 6c 73 3a 20 49 4e | 54 45 47 45 52 3b 0d 20 |nels: IN|TEGER;. |
|00000a40| 73 61 6d 70 6c 65 53 69 | 7a 65 3a 20 49 4e 54 45 |sampleSi|ze: INTE|
|00000a50| 47 45 52 3b 0d 20 63 6f | 6d 70 72 65 73 73 69 6f |GER;. co|mpressio|
|00000a60| 6e 49 44 3a 20 49 4e 54 | 45 47 45 52 3b 0d 20 70 |nID: INT|EGER;. p|
|00000a70| 61 63 6b 65 74 53 69 7a | 65 3a 20 49 4e 54 45 47 |acketSiz|e: INTEG|
|00000a80| 45 52 3b 0d 20 73 61 6d | 70 6c 65 52 61 74 65 3a |ER;. sam|pleRate:|
|00000a90| 20 46 69 78 65 64 3b 0d | 20 45 4e 44 3b 0d 0d 54 | Fixed;.| END;..T|
|00000aa0| 65 78 74 44 65 73 63 72 | 69 70 74 69 6f 6e 50 74 |extDescr|iptionPt|
|00000ab0| 72 20 3d 20 5e 54 65 78 | 74 44 65 73 63 72 69 70 |r = ^Tex|tDescrip|
|00000ac0| 74 69 6f 6e 3b 0d 54 65 | 78 74 44 65 73 63 72 69 |tion;.Te|xtDescri|
|00000ad0| 70 74 69 6f 6e 48 61 6e | 64 6c 65 20 3d 20 5e 54 |ptionHan|dle = ^T|
|00000ae0| 65 78 74 44 65 73 63 72 | 69 70 74 69 6f 6e 50 74 |extDescr|iptionPt|
|00000af0| 72 3b 0d 54 65 78 74 44 | 65 73 63 72 69 70 74 69 |r;.TextD|escripti|
|00000b00| 6f 6e 20 3d 20 52 45 43 | 4f 52 44 0d 20 64 65 73 |on = REC|ORD. des|
|00000b10| 63 53 69 7a 65 3a 20 4c | 4f 4e 47 49 4e 54 3b 0d |cSize: L|ONGINT;.|
|00000b20| 20 64 61 74 61 46 6f 72 | 6d 61 74 3a 20 4c 4f 4e | dataFor|mat: LON|
|00000b30| 47 49 4e 54 3b 0d 0d 20 | 72 65 73 76 64 31 3a 20 |GINT;.. |resvd1: |
|00000b40| 4c 4f 4e 47 49 4e 54 3b | 0d 20 72 65 73 76 64 32 |LONGINT;|. resvd2|
|00000b50| 3a 20 4c 4f 4e 47 49 4e | 54 3b 0d 0d 20 64 69 73 |: LONGIN|T;.. dis|
|00000b60| 70 6c 61 79 46 6c 61 67 | 73 3a 20 4c 4f 4e 47 49 |playFlag|s: LONGI|
|00000b70| 4e 54 3b 0d 20 74 65 78 | 74 4a 75 73 74 69 66 69 |NT;. tex|tJustifi|
|00000b80| 63 61 74 69 6f 6e 3a 20 | 4c 4f 4e 47 49 4e 54 3b |cation: |LONGINT;|
|00000b90| 0d 09 0d 20 62 67 43 6f | 6c 6f 72 3a 20 52 47 42 |... bgCo|lor: RGB|
|00000ba0| 43 6f 6c 6f 72 3b 0d 09 | 0d 20 64 65 66 61 75 6c |Color;..|. defaul|
|00000bb0| 74 54 65 78 74 42 6f 78 | 3a 20 52 65 63 74 3b 0d |tTextBox|: Rect;.|
|00000bc0| 20 64 65 66 61 75 6c 74 | 53 74 79 6c 65 3a 20 53 | default|Style: S|
|00000bd0| 63 72 70 53 54 45 6c 65 | 6d 65 6e 74 3b 0d 20 45 |crpSTEle|ment;. E|
|00000be0| 4e 44 3b 0d 0d 43 4f 4e | 53 54 0d 0d 7b 20 70 72 |ND;..CON|ST..{ pr|
|00000bf0| 6f 67 72 65 73 73 20 6d | 65 73 73 61 67 65 73 20 |ogress m|essages |
|00000c00| 7d 0d 6d 6f 76 69 65 50 | 72 6f 67 72 65 73 73 4f |}.movieP|rogressO|
|00000c10| 70 65 6e 20 3d 20 30 3b | 0d 6d 6f 76 69 65 50 72 |pen = 0;|.moviePr|
|00000c20| 6f 67 72 65 73 73 55 70 | 64 61 74 65 50 65 72 63 |ogressUp|datePerc|
|00000c30| 65 6e 74 20 3d 20 31 3b | 0d 6d 6f 76 69 65 50 72 |ent = 1;|.moviePr|
|00000c40| 6f 67 72 65 73 73 43 6c | 6f 73 65 20 3d 20 32 3b |ogressCl|ose = 2;|
|00000c50| 0d 0d 0d 7b 20 70 72 6f | 67 72 65 73 73 20 6f 70 |...{ pro|gress op|
|00000c60| 65 72 61 74 69 6f 6e 73 | 20 7d 0d 70 72 6f 67 72 |erations| }.progr|
|00000c70| 65 73 73 4f 70 46 6c 61 | 74 74 65 6e 20 3d 20 31 |essOpFla|tten = 1|
|00000c80| 3b 0d 70 72 6f 67 72 65 | 73 73 4f 70 49 6e 73 65 |;.progre|ssOpInse|
|00000c90| 72 74 54 72 61 63 6b 53 | 65 67 6d 65 6e 74 20 3d |rtTrackS|egment =|
|00000ca0| 20 32 3b 0d 70 72 6f 67 | 72 65 73 73 4f 70 49 6e | 2;.prog|ressOpIn|
|00000cb0| 73 65 72 74 4d 6f 76 69 | 65 53 65 67 6d 65 6e 74 |sertMovi|eSegment|
|00000cc0| 20 3d 20 33 3b 0d 70 72 | 6f 67 72 65 73 73 4f 70 | = 3;.pr|ogressOp|
|00000cd0| 50 61 73 74 65 20 3d 20 | 34 3b 0d 70 72 6f 67 72 |Paste = |4;.progr|
|00000ce0| 65 73 73 4f 70 41 64 64 | 4d 6f 76 69 65 53 65 6c |essOpAdd|MovieSel|
|00000cf0| 65 63 74 69 6f 6e 20 3d | 20 35 3b 0d 70 72 6f 67 |ection =| 5;.prog|
|00000d00| 72 65 73 73 4f 70 43 6f | 70 79 20 3d 20 36 3b 0d |ressOpCo|py = 6;.|
|00000d10| 70 72 6f 67 72 65 73 73 | 4f 70 43 75 74 20 3d 20 |progress|OpCut = |
|00000d20| 37 3b 0d 70 72 6f 67 72 | 65 73 73 4f 70 4c 6f 61 |7;.progr|essOpLoa|
|00000d30| 64 4d 6f 76 69 65 49 6e | 74 6f 52 61 6d 20 3d 20 |dMovieIn|toRam = |
|00000d40| 38 3b 0d 70 72 6f 67 72 | 65 73 73 4f 70 4c 6f 61 |8;.progr|essOpLoa|
|00000d50| 64 54 72 61 63 6b 49 6e | 74 6f 52 61 6d 20 3d 20 |dTrackIn|toRam = |
|00000d60| 39 3b 0d 70 72 6f 67 72 | 65 73 73 4f 70 4c 6f 61 |9;.progr|essOpLoa|
|00000d70| 64 4d 65 64 69 61 49 6e | 74 6f 52 61 6d 20 3d 20 |dMediaIn|toRam = |
|00000d80| 31 30 3b 0d 0d 7b 20 6d | 65 64 69 61 20 71 75 61 |10;..{ m|edia qua|
|00000d90| 6c 69 74 79 20 73 65 74 | 74 69 6e 67 73 20 7d 0d |lity set|tings }.|
|00000da0| 6d 65 64 69 61 51 75 61 | 6c 69 74 79 44 72 61 66 |mediaQua|lityDraf|
|00000db0| 74 20 3d 20 24 30 30 30 | 30 3b 0d 6d 65 64 69 61 |t = $000|0;.media|
|00000dc0| 51 75 61 6c 69 74 79 4e | 6f 72 6d 61 6c 20 3d 20 |QualityN|ormal = |
|00000dd0| 24 30 30 34 30 3b 0d 6d | 65 64 69 61 51 75 61 6c |$0040;.m|ediaQual|
|00000de0| 69 74 79 42 65 74 74 65 | 72 20 3d 20 24 30 30 38 |ityBette|r = $008|
|00000df0| 30 3b 0d 6d 65 64 69 61 | 51 75 61 6c 69 74 79 42 |0;.media|QualityB|
|00000e00| 65 73 74 20 3d 20 24 30 | 30 43 30 3b 0d 0d 7b 20 |est = $0|0C0;..{ |
|00000e10| 6c 6f 61 64 69 6e 74 6f | 72 61 6d 20 66 6c 61 67 |loadinto|ram flag|
|00000e20| 73 20 7d 0d 6b 65 65 70 | 49 6e 52 61 6d 20 3d 20 |s }.keep|InRam = |
|00000e30| 31 3b 0d 75 6e 6b 65 65 | 70 49 6e 52 61 6d 20 3d |1;.unkee|pInRam =|
|00000e40| 20 32 3b 0d 66 6c 75 73 | 68 46 72 6f 6d 52 61 6d | 2;.flus|hFromRam|
|00000e50| 20 3d 20 34 3b 0d 6c 6f | 61 64 46 6f 72 77 61 72 | = 4;.lo|adForwar|
|00000e60| 64 54 72 61 63 6b 45 64 | 69 74 73 20 3d 20 38 3b |dTrackEd|its = 8;|
|00000e70| 0d 6c 6f 61 64 42 61 63 | 6b 77 61 72 64 54 72 61 |.loadBac|kwardTra|
|00000e80| 63 6b 45 64 69 74 73 20 | 3d 20 31 36 3b 0d 0d 0d |ckEdits |= 16;...|
|00000e90| 54 59 50 45 0d 4d 6f 76 | 69 65 50 72 6f 67 72 65 |TYPE.Mov|ieProgre|
|00000ea0| 73 73 50 72 6f 63 50 74 | 72 20 3d 20 50 72 6f 63 |ssProcPt|r = Proc|
|00000eb0| 50 74 72 3b 0d 0d 4d 6f | 76 69 65 52 67 6e 43 6f |Ptr;..Mo|vieRgnCo|
|00000ec0| 76 65 72 50 72 6f 63 20 | 3d 20 50 72 6f 63 50 74 |verProc |= ProcPt|
|00000ed0| 72 3b 0d 0d 4d 65 64 69 | 61 49 6e 66 6f 72 6d 61 |r;..Medi|aInforma|
|00000ee0| 74 69 6f 6e 48 61 6e 64 | 6c 65 20 3d 20 48 61 6e |tionHand|le = Han|
|00000ef0| 64 6c 65 3b 0d 4d 65 64 | 69 61 48 61 6e 64 6c 65 |dle;.Med|iaHandle|
|00000f00| 72 20 3d 20 43 6f 6d 70 | 6f 6e 65 6e 74 49 6e 73 |r = Comp|onentIns|
|00000f10| 74 61 6e 63 65 3b 0d 4d | 65 64 69 61 48 61 6e 64 |tance;.M|ediaHand|
|00000f20| 6c 65 72 43 6f 6d 70 6f | 6e 65 6e 74 20 3d 20 43 |lerCompo|nent = C|
|00000f30| 6f 6d 70 6f 6e 65 6e 74 | 3b 0d 44 61 74 61 48 61 |omponent|;.DataHa|
|00000f40| 6e 64 6c 65 72 20 3d 20 | 43 6f 6d 70 6f 6e 65 6e |ndler = |Componen|
|00000f50| 74 49 6e 73 74 61 6e 63 | 65 3b 0d 44 61 74 61 48 |tInstanc|e;.DataH|
|00000f60| 61 6e 64 6c 65 72 43 6f | 6d 70 6f 6e 65 6e 74 20 |andlerCo|mponent |
|00000f70| 3d 20 43 6f 6d 70 6f 6e | 65 6e 74 3b 0d 48 61 6e |= Compon|ent;.Han|
|00000f80| 64 6c 65 72 45 72 72 6f | 72 20 3d 20 43 6f 6d 70 |dlerErro|r = Comp|
|00000f90| 6f 6e 65 6e 74 52 65 73 | 75 6c 74 3b 0d 4d 6f 76 |onentRes|ult;.Mov|
|00000fa0| 69 65 43 6f 6e 74 72 6f | 6c 6c 65 72 20 3d 20 43 |ieContro|ller = C|
|00000fb0| 6f 6d 70 6f 6e 65 6e 74 | 49 6e 73 74 61 6e 63 65 |omponent|Instance|
|00000fc0| 3b 0d 0d 45 72 72 6f 72 | 50 72 6f 63 50 74 72 20 |;..Error|ProcPtr |
|00000fd0| 3d 20 50 72 6f 63 50 74 | 72 3b 0d 4d 6f 76 69 65 |= ProcPt|r;.Movie|
|00000fe0| 50 72 65 76 69 65 77 43 | 61 6c 6c 4f 75 74 50 72 |PreviewC|allOutPr|
|00000ff0| 6f 63 20 3d 20 50 72 6f | 63 50 74 72 3b 0d 0d 43 |oc = Pro|cPtr;..C|
|00001000| 4f 4e 53 54 0d 6e 65 77 | 4d 6f 76 69 65 41 63 74 |ONST.new|MovieAct|
|00001010| 69 76 65 20 3d 20 24 31 | 3b 0d 6e 65 77 4d 6f 76 |ive = $1|;.newMov|
|00001020| 69 65 44 6f 6e 74 52 65 | 73 6f 6c 76 65 44 61 74 |ieDontRe|solveDat|
|00001030| 61 52 65 66 73 20 3d 20 | 24 32 3b 0d 6e 65 77 4d |aRefs = |$2;.newM|
|00001040| 6f 76 69 65 44 6f 6e 74 | 41 73 6b 55 6e 72 65 73 |ovieDont|AskUnres|
|00001050| 6f 6c 76 65 64 44 61 74 | 61 52 65 66 73 20 3d 20 |olvedDat|aRefs = |
|00001060| 24 34 3b 0d 0d 74 72 61 | 63 6b 55 73 61 67 65 49 |$4;..tra|ckUsageI|
|00001070| 6e 4d 6f 76 69 65 20 3d | 20 24 32 3b 0d 74 72 61 |nMovie =| $2;.tra|
|00001080| 63 6b 55 73 61 67 65 49 | 6e 50 72 65 76 69 65 77 |ckUsageI|nPreview|
|00001090| 20 3d 20 24 34 3b 0d 74 | 72 61 63 6b 55 73 61 67 | = $4;.t|rackUsag|
|000010a0| 65 49 6e 50 6f 73 74 65 | 72 20 3d 20 24 38 3b 0d |eInPoste|r = $8;.|
|000010b0| 0d 6d 65 64 69 61 53 61 | 6d 70 6c 65 4e 6f 74 53 |.mediaSa|mpleNotS|
|000010c0| 79 6e 63 20 3d 20 31 3b | 0d 6d 65 64 69 61 53 61 |ync = 1;|.mediaSa|
|000010d0| 6d 70 6c 65 53 68 61 64 | 6f 77 53 79 6e 63 20 3d |mpleShad|owSync =|
|000010e0| 20 32 3b 0d 0d 6e 65 78 | 74 54 69 6d 65 4d 65 64 | 2;..nex|tTimeMed|
|000010f0| 69 61 53 61 6d 70 6c 65 | 20 3d 20 24 31 3b 0d 6e |iaSample| = $1;.n|
|00001100| 65 78 74 54 69 6d 65 4d | 65 64 69 61 45 64 69 74 |extTimeM|ediaEdit|
|00001110| 20 3d 20 24 32 3b 0d 6e | 65 78 74 54 69 6d 65 54 | = $2;.n|extTimeT|
|00001120| 72 61 63 6b 45 64 69 74 | 20 3d 20 24 34 3b 0d 6e |rackEdit| = $4;.n|
|00001130| 65 78 74 54 69 6d 65 53 | 79 6e 63 53 61 6d 70 6c |extTimeS|yncSampl|
|00001140| 65 20 3d 20 24 38 3b 0d | 6e 65 78 74 54 69 6d 65 |e = $8;.|nextTime|
|00001150| 45 64 67 65 4f 4b 20 3d | 20 24 32 30 30 30 3b 0d |EdgeOK =| $2000;.|
|00001160| 6e 65 78 74 54 69 6d 65 | 49 67 6e 6f 72 65 41 63 |nextTime|IgnoreAc|
|00001170| 74 69 76 65 53 65 67 6d | 65 6e 74 20 3d 20 24 34 |tiveSegm|ent = $4|
|00001180| 30 30 30 3b 0d 0d 63 72 | 65 61 74 65 4d 6f 76 69 |000;..cr|eateMovi|
|00001190| 65 46 69 6c 65 44 65 6c | 65 74 65 43 75 72 46 69 |eFileDel|eteCurFi|
|000011a0| 6c 65 20 3d 20 24 38 30 | 30 30 30 30 30 30 3b 0d |le = $80|000000;.|
|000011b0| 63 72 65 61 74 65 4d 6f | 76 69 65 46 69 6c 65 44 |createMo|vieFileD|
|000011c0| 6f 6e 74 43 72 65 61 74 | 65 4d 6f 76 69 65 20 3d |ontCreat|eMovie =|
|000011d0| 20 24 34 30 30 30 30 30 | 30 30 3b 0d 63 72 65 61 | $400000|00;.crea|
|000011e0| 74 65 4d 6f 76 69 65 46 | 69 6c 65 44 6f 6e 74 4f |teMovieF|ileDontO|
|000011f0| 70 65 6e 46 69 6c 65 20 | 3d 20 24 32 30 30 30 30 |penFile |= $20000|
|00001200| 30 30 30 3b 0d 0d 66 6c | 61 74 74 65 6e 41 64 64 |000;..fl|attenAdd|
|00001210| 4d 6f 76 69 65 54 6f 44 | 61 74 61 46 6f 72 6b 20 |MovieToD|ataFork |
|00001220| 3d 20 24 31 3b 0d 66 6c | 61 74 74 65 6e 41 63 74 |= $1;.fl|attenAct|
|00001230| 69 76 65 54 72 61 63 6b | 73 4f 6e 6c 79 20 3d 20 |iveTrack|sOnly = |
|00001240| 24 34 3b 0d 66 6c 61 74 | 74 65 6e 44 6f 6e 74 49 |$4;.flat|tenDontI|
|00001250| 6e 74 65 72 6c 65 61 76 | 65 46 6c 61 74 74 65 6e |nterleav|eFlatten|
|00001260| 20 3d 20 24 38 3b 0d 0d | 6d 6f 76 69 65 53 63 72 | = $8;..|movieScr|
|00001270| 61 70 44 6f 6e 74 5a 65 | 72 6f 53 63 72 61 70 20 |apDontZe|roScrap |
|00001280| 3d 20 24 31 3b 0d 6d 6f | 76 69 65 53 63 72 61 70 |= $1;.mo|vieScrap|
|00001290| 4f 6e 6c 79 50 75 74 4d | 6f 76 69 65 20 3d 20 24 |OnlyPutM|ovie = $|
|000012a0| 32 3b 0d 0d 68 69 6e 74 | 73 53 63 72 75 62 4d 6f |2;..hint|sScrubMo|
|000012b0| 64 65 20 3d 20 24 31 3b | 0d 68 69 6e 74 73 55 73 |de = $1;|.hintsUs|
|000012c0| 65 53 63 72 65 65 6e 42 | 75 66 66 65 72 20 3d 20 |eScreenB|uffer = |
|000012d0| 24 32 30 3b 0d 68 69 6e | 74 73 41 6c 6c 6f 77 49 |$20;.hin|tsAllowI|
|000012e0| 6e 74 65 72 6c 61 63 65 | 20 3d 20 24 34 30 3b 0d |nterlace| = $40;.|
|000012f0| 68 69 6e 74 73 55 73 65 | 53 6f 75 6e 64 4c 65 72 |hintsUse|SoundLer|
|00001300| 70 20 3d 20 24 38 30 3b | 0d 0d 6d 65 64 69 61 48 |p = $80;|..mediaH|
|00001310| 61 6e 64 6c 65 72 46 6c | 61 67 47 65 6e 65 72 69 |andlerFl|agGeneri|
|00001320| 63 43 6c 69 65 6e 74 20 | 3d 20 31 3b 0d 0d 64 66 |cClient |= 1;..df|
|00001330| 44 6f 6e 74 44 69 73 70 | 6c 61 79 20 3d 20 24 31 |DontDisp|lay = $1|
|00001340| 3b 0d 64 66 44 6f 6e 74 | 41 75 74 6f 53 63 61 6c |;.dfDont|AutoScal|
|00001350| 65 20 3d 20 24 32 3b 0d | 64 66 43 6c 69 70 54 6f |e = $2;.|dfClipTo|
|00001360| 54 65 78 74 42 6f 78 20 | 3d 20 24 34 3b 0d 64 66 |TextBox |= $4;.df|
|00001370| 55 73 65 4d 6f 76 69 65 | 42 47 43 6f 6c 6f 72 20 |UseMovie|BGColor |
|00001380| 3d 20 24 38 3b 0d 64 66 | 54 65 78 74 42 6f 78 49 |= $8;.df|TextBoxI|
|00001390| 6e 44 61 74 61 20 3d 20 | 24 31 30 3b 0d 64 66 56 |nData = |$10;.dfV|
|000013a0| 65 72 74 53 63 72 6f 6c | 6c 20 3d 20 24 32 30 3b |ertScrol|l = $20;|
|000013b0| 0d 64 66 48 6f 72 69 7a | 53 63 72 6f 6c 6c 20 3d |.dfHoriz|Scroll =|
|000013c0| 20 24 34 30 3b 0d 0d 74 | 78 74 50 72 6f 63 44 65 | $40;..t|xtProcDe|
|000013d0| 66 61 75 6c 74 44 69 73 | 70 6c 61 79 20 3d 20 30 |faultDis|play = 0|
|000013e0| 3b 0d 74 78 74 50 72 6f | 63 44 6f 6e 74 44 69 73 |;.txtPro|cDontDis|
|000013f0| 70 6c 61 79 20 3d 20 31 | 3b 0d 74 78 74 50 72 6f |play = 1|;.txtPro|
|00001400| 63 44 6f 44 69 73 70 6c | 61 79 20 3d 20 32 3b 0d |cDoDispl|ay = 2;.|
|00001410| 0d 7b 20 20 49 6e 69 74 | 69 61 6c 69 7a 61 74 69 |.{  Init|ializati|
|00001420| 6f 6e 20 52 6f 75 74 69 | 6e 65 73 20 20 7d 0d 46 |on Routi|nes  }.F|
|00001430| 55 4e 43 54 49 4f 4e 20 | 45 6e 74 65 72 4d 6f 76 |UNCTION |EnterMov|
|00001440| 69 65 73 3a 20 4f 53 45 | 72 72 3b 0d 20 49 4e 4c |ies: OSE|rr;. INL|
|00001450| 49 4e 45 20 24 33 30 33 | 43 2c 24 31 2c 24 41 41 |INE $303|C,$1,$AA|
|00001460| 41 41 3b 0d 50 52 4f 43 | 45 44 55 52 45 20 45 78 |AA;.PROC|EDURE Ex|
|00001470| 69 74 4d 6f 76 69 65 73 | 3b 0d 20 49 4e 4c 49 4e |itMovies|;. INLIN|
|00001480| 45 20 24 33 30 33 43 2c | 24 32 2c 24 41 41 41 41 |E $303C,|$2,$AAAA|
|00001490| 3b 0d 0d 0d 7b 20 20 65 | 72 72 6f 72 20 52 6f 75 |;...{  e|rror Rou|
|000014a0| 74 69 6e 65 73 20 20 7d | 0d 46 55 4e 43 54 49 4f |tines  }|.FUNCTIO|
|000014b0| 4e 20 47 65 74 4d 6f 76 | 69 65 73 45 72 72 6f 72 |N GetMov|iesError|
|000014c0| 3a 20 4f 53 45 72 72 3b | 0d 20 49 4e 4c 49 4e 45 |: OSErr;|. INLINE|
|000014d0| 20 24 33 30 33 43 2c 24 | 33 2c 24 41 41 41 41 3b | $303C,$|3,$AAAA;|
|000014e0| 0d 50 52 4f 43 45 44 55 | 52 45 20 43 6c 65 61 72 |.PROCEDU|RE Clear|
|000014f0| 4d 6f 76 69 65 73 53 74 | 69 63 6b 79 45 72 72 6f |MoviesSt|ickyErro|
|00001500| 72 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |r;. INLI|NE $303C|
|00001510| 2c 24 44 45 2c 24 41 41 | 41 41 3b 0d 46 55 4e 43 |,$DE,$AA|AA;.FUNC|
|00001520| 54 49 4f 4e 20 47 65 74 | 4d 6f 76 69 65 73 53 74 |TION Get|MoviesSt|
|00001530| 69 63 6b 79 45 72 72 6f | 72 3a 20 4f 53 45 72 72 |ickyErro|r: OSErr|
|00001540| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00001550| 24 34 2c 24 41 41 41 41 | 3b 0d 0d 50 52 4f 43 45 |$4,$AAAA|;..PROCE|
|00001560| 44 55 52 45 20 53 65 74 | 4d 6f 76 69 65 73 45 72 |DURE Set|MoviesEr|
|00001570| 72 6f 72 50 72 6f 63 28 | 65 72 72 50 72 6f 63 3a |rorProc(|errProc:|
|00001580| 20 45 72 72 6f 72 50 72 | 6f 63 50 74 72 3b 72 65 | ErrorPr|ocPtr;re|
|00001590| 66 63 6f 6e 3a 20 4c 4f | 4e 47 49 4e 54 29 3b 0d |fcon: LO|NGINT);.|
|000015a0| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 45 | INLINE |$303C,$E|
|000015b0| 46 2c 24 41 41 41 41 3b | 0d 0d 46 55 4e 43 54 49 |F,$AAAA;|..FUNCTI|
|000015c0| 4f 4e 20 47 65 74 54 72 | 61 63 6b 53 74 61 74 75 |ON GetTr|ackStatu|
|000015d0| 73 28 74 3a 20 54 72 61 | 63 6b 29 3a 20 43 6f 6d |s(t: Tra|ck): Com|
|000015e0| 70 6f 6e 65 6e 74 52 65 | 73 75 6c 74 3b 0d 20 49 |ponentRe|sult;. I|
|000015f0| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 31 37 32 |NLINE $3|03C,$172|
|00001600| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|00001610| 20 47 65 74 4d 6f 76 69 | 65 53 74 61 74 75 73 28 | GetMovi|eStatus(|
|00001620| 6d 3a 20 4d 6f 76 69 65 | 3b 56 41 52 20 66 69 72 |m: Movie|;VAR fir|
|00001630| 73 74 50 72 6f 62 6c 65 | 6d 54 72 61 63 6b 3a 20 |stProble|mTrack: |
|00001640| 54 72 61 63 6b 29 3a 20 | 43 6f 6d 70 6f 6e 65 6e |Track): |Componen|
|00001650| 74 52 65 73 75 6c 74 3b | 0d 20 49 4e 4c 49 4e 45 |tResult;|. INLINE|
|00001660| 20 24 33 30 33 43 2c 24 | 31 37 33 2c 24 41 41 41 | $303C,$|173,$AAA|
|00001670| 41 3b 0d 0d 0d 7b 20 20 | 50 6c 61 79 62 61 63 6b |A;...{  |Playback|
|00001680| 20 52 6f 75 74 69 6e 65 | 73 20 20 7d 0d 50 52 4f | Routine|s  }.PRO|
|00001690| 43 45 44 55 52 45 20 4d | 6f 76 69 65 73 54 61 73 |CEDURE M|oviesTas|
|000016a0| 6b 28 6d 3a 20 4d 6f 76 | 69 65 3b 6d 61 78 4d 69 |k(m: Mov|ie;maxMi|
|000016b0| 6c 6c 69 53 65 63 54 6f | 55 73 65 3a 20 4c 4f 4e |lliSecTo|Use: LON|
|000016c0| 47 49 4e 54 29 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |GINT);. |INLINE $|
|000016d0| 33 30 33 43 2c 24 35 2c | 24 41 41 41 41 3b 0d 0d |303C,$5,|$AAAA;..|
|000016e0| 50 52 4f 43 45 44 55 52 | 45 20 53 74 61 72 74 4d |PROCEDUR|E StartM|
|000016f0| 6f 76 69 65 28 6d 3a 20 | 4d 6f 76 69 65 29 3b 0d |ovie(m: |Movie);.|
|00001700| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 42 | INLINE |$303C,$B|
|00001710| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00001720| 45 20 53 74 6f 70 4d 6f | 76 69 65 28 6d 3a 20 4d |E StopMo|vie(m: M|
|00001730| 6f 76 69 65 29 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |ovie);. |INLINE $|
|00001740| 33 30 33 43 2c 24 43 2c | 24 41 41 41 41 3b 0d 50 |303C,$C,|$AAAA;.P|
|00001750| 52 4f 43 45 44 55 52 45 | 20 47 6f 54 6f 42 65 67 |ROCEDURE| GoToBeg|
|00001760| 69 6e 6e 69 6e 67 4f 66 | 4d 6f 76 69 65 28 6d 3a |inningOf|Movie(m:|
|00001770| 20 4d 6f 76 69 65 29 3b | 0d 20 49 4e 4c 49 4e 45 | Movie);|. INLINE|
|00001780| 20 24 33 30 33 43 2c 24 | 44 2c 24 41 41 41 41 3b | $303C,$|D,$AAAA;|
|00001790| 0d 50 52 4f 43 45 44 55 | 52 45 20 47 6f 54 6f 45 |.PROCEDU|RE GoToE|
|000017a0| 6e 64 4f 66 4d 6f 76 69 | 65 28 6d 3a 20 4d 6f 76 |ndOfMovi|e(m: Mov|
|000017b0| 69 65 29 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |ie);. IN|LINE $30|
|000017c0| 33 43 2c 24 45 2c 24 41 | 41 41 41 3b 0d 46 55 4e |3C,$E,$A|AAA;.FUN|
|000017d0| 43 54 49 4f 4e 20 49 73 | 4d 6f 76 69 65 44 6f 6e |CTION Is|MovieDon|
|000017e0| 65 28 6d 3a 20 4d 6f 76 | 69 65 29 3a 20 42 4f 4f |e(m: Mov|ie): BOO|
|000017f0| 4c 45 41 4e 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |LEAN;. I|NLINE $3|
|00001800| 30 33 43 2c 24 44 44 2c | 24 41 41 41 41 3b 0d 0d |03C,$DD,|$AAAA;..|
|00001810| 46 55 4e 43 54 49 4f 4e | 20 47 65 74 4d 6f 76 69 |FUNCTION| GetMovi|
|00001820| 65 50 72 65 76 69 65 77 | 4d 6f 64 65 28 6d 3a 20 |ePreview|Mode(m: |
|00001830| 4d 6f 76 69 65 29 3a 20 | 42 4f 4f 4c 45 41 4e 3b |Movie): |BOOLEAN;|
|00001840| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00001850| 46 2c 24 41 41 41 41 3b | 0d 50 52 4f 43 45 44 55 |F,$AAAA;|.PROCEDU|
|00001860| 52 45 20 53 65 74 4d 6f | 76 69 65 50 72 65 76 69 |RE SetMo|viePrevi|
|00001870| 65 77 4d 6f 64 65 28 6d | 3a 20 4d 6f 76 69 65 3b |ewMode(m|: Movie;|
|00001880| 75 73 65 50 72 65 76 69 | 65 77 3a 20 42 4f 4f 4c |usePrevi|ew: BOOL|
|00001890| 45 41 4e 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |EAN);. I|NLINE $3|
|000018a0| 30 33 43 2c 24 31 30 2c | 24 41 41 41 41 3b 0d 50 |03C,$10,|$AAAA;.P|
|000018b0| 52 4f 43 45 44 55 52 45 | 20 53 68 6f 77 4d 6f 76 |ROCEDURE| ShowMov|
|000018c0| 69 65 50 6f 73 74 65 72 | 28 6d 3a 20 4d 6f 76 69 |iePoster|(m: Movi|
|000018d0| 65 29 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |e);. INL|INE $303|
|000018e0| 43 2c 24 31 31 2c 24 41 | 41 41 41 3b 0d 0d 50 52 |C,$11,$A|AAA;..PR|
|000018f0| 4f 43 45 44 55 52 45 20 | 47 65 74 4d 6f 76 69 65 |OCEDURE |GetMovie|
|00001900| 47 57 6f 72 6c 64 28 6d | 3a 20 4d 6f 76 69 65 3b |GWorld(m|: Movie;|
|00001910| 56 41 52 20 70 6f 72 74 | 3a 20 43 47 72 61 66 50 |VAR port|: CGrafP|
|00001920| 74 72 3b 56 41 52 20 67 | 64 68 3a 20 47 44 48 61 |tr;VAR g|dh: GDHa|
|00001930| 6e 64 6c 65 29 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |ndle);. |INLINE $|
|00001940| 33 30 33 43 2c 24 31 35 | 2c 24 41 41 41 41 3b 0d |303C,$15|,$AAAA;.|
|00001950| 50 52 4f 43 45 44 55 52 | 45 20 53 65 74 4d 6f 76 |PROCEDUR|E SetMov|
|00001960| 69 65 47 57 6f 72 6c 64 | 28 6d 3a 20 4d 6f 76 69 |ieGWorld|(m: Movi|
|00001970| 65 3b 70 6f 72 74 3a 20 | 43 47 72 61 66 50 74 72 |e;port: |CGrafPtr|
|00001980| 3b 67 64 68 3a 20 47 44 | 48 61 6e 64 6c 65 29 3b |;gdh: GD|Handle);|
|00001990| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|000019a0| 31 36 2c 24 41 41 41 41 | 3b 0d 0d 46 55 4e 43 54 |16,$AAAA|;..FUNCT|
|000019b0| 49 4f 4e 20 50 72 65 72 | 6f 6c 6c 4d 6f 76 69 65 |ION Prer|ollMovie|
|000019c0| 28 6d 3a 20 4d 6f 76 69 | 65 3b 74 69 6d 65 3a 20 |(m: Movi|e;time: |
|000019d0| 54 69 6d 65 56 61 6c 75 | 65 3b 52 61 74 65 3a 20 |TimeValu|e;Rate: |
|000019e0| 46 69 78 65 64 29 3a 20 | 4f 53 45 72 72 3b 0d 20 |Fixed): |OSErr;. |
|000019f0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 36 2c |INLINE $|303C,$6,|
|00001a00| 24 41 41 41 41 3b 0d 46 | 55 4e 43 54 49 4f 4e 20 |$AAAA;.F|UNCTION |
|00001a10| 4c 6f 61 64 4d 6f 76 69 | 65 49 6e 74 6f 52 61 6d |LoadMovi|eIntoRam|
|00001a20| 28 6d 3a 20 4d 6f 76 69 | 65 3b 74 69 6d 65 3a 20 |(m: Movi|e;time: |
|00001a30| 54 69 6d 65 56 61 6c 75 | 65 3b 64 75 72 61 74 69 |TimeValu|e;durati|
|00001a40| 6f 6e 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 0d 20 |on: Time|Value;. |
|00001a50| 66 6c 61 67 73 3a 20 4c | 4f 4e 47 49 4e 54 29 3a |flags: L|ONGINT):|
|00001a60| 20 4f 53 45 72 72 3b 0d | 20 49 4e 4c 49 4e 45 20 | OSErr;.| INLINE |
|00001a70| 24 33 30 33 43 2c 24 37 | 2c 24 41 41 41 41 3b 0d |$303C,$7|,$AAAA;.|
|00001a80| 46 55 4e 43 54 49 4f 4e | 20 4c 6f 61 64 54 72 61 |FUNCTION| LoadTra|
|00001a90| 63 6b 49 6e 74 6f 52 61 | 6d 28 74 3a 20 54 72 61 |ckIntoRa|m(t: Tra|
|00001aa0| 63 6b 3b 74 69 6d 65 3a | 20 54 69 6d 65 56 61 6c |ck;time:| TimeVal|
|00001ab0| 75 65 3b 64 75 72 61 74 | 69 6f 6e 3a 20 54 69 6d |ue;durat|ion: Tim|
|00001ac0| 65 56 61 6c 75 65 3b 0d | 20 66 6c 61 67 73 3a 20 |eValue;.| flags: |
|00001ad0| 4c 4f 4e 47 49 4e 54 29 | 3a 20 4f 53 45 72 72 3b |LONGINT)|: OSErr;|
|00001ae0| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00001af0| 31 36 45 2c 24 41 41 41 | 41 3b 0d 46 55 4e 43 54 |16E,$AAA|A;.FUNCT|
|00001b00| 49 4f 4e 20 4c 6f 61 64 | 4d 65 64 69 61 49 6e 74 |ION Load|MediaInt|
|00001b10| 6f 52 61 6d 28 6d 3a 20 | 4d 65 64 69 61 3b 74 69 |oRam(m: |Media;ti|
|00001b20| 6d 65 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 64 75 |me: Time|Value;du|
|00001b30| 72 61 74 69 6f 6e 3a 20 | 54 69 6d 65 56 61 6c 75 |ration: |TimeValu|
|00001b40| 65 3b 0d 20 66 6c 61 67 | 73 3a 20 4c 4f 4e 47 49 |e;. flag|s: LONGI|
|00001b50| 4e 54 29 3a 20 4f 53 45 | 72 72 3b 0d 20 49 4e 4c |NT): OSE|rr;. INL|
|00001b60| 49 4e 45 20 24 33 30 33 | 43 2c 24 38 2c 24 41 41 |INE $303|C,$8,$AA|
|00001b70| 41 41 3b 0d 0d 50 52 4f | 43 45 44 55 52 45 20 53 |AA;..PRO|CEDURE S|
|00001b80| 65 74 4d 6f 76 69 65 41 | 63 74 69 76 65 28 6d 3a |etMovieA|ctive(m:|
|00001b90| 20 4d 6f 76 69 65 3b 61 | 63 74 69 76 65 3a 20 42 | Movie;a|ctive: B|
|00001ba0| 4f 4f 4c 45 41 4e 29 3b | 0d 20 49 4e 4c 49 4e 45 |OOLEAN);|. INLINE|
|00001bb0| 20 24 33 30 33 43 2c 24 | 39 2c 24 41 41 41 41 3b | $303C,$|9,$AAAA;|
|00001bc0| 0d 46 55 4e 43 54 49 4f | 4e 20 47 65 74 4d 6f 76 |.FUNCTIO|N GetMov|
|00001bd0| 69 65 41 63 74 69 76 65 | 28 6d 3a 20 4d 6f 76 69 |ieActive|(m: Movi|
|00001be0| 65 29 3a 20 42 4f 4f 4c | 45 41 4e 3b 0d 20 49 4e |e): BOOL|EAN;. IN|
|00001bf0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 41 2c 24 41 |LINE $30|3C,$A,$A|
|00001c00| 41 41 41 3b 0d 0d 50 52 | 4f 43 45 44 55 52 45 20 |AAA;..PR|OCEDURE |
|00001c10| 50 6c 61 79 4d 6f 76 69 | 65 50 72 65 76 69 65 77 |PlayMovi|ePreview|
|00001c20| 28 6d 3a 20 4d 6f 76 69 | 65 3b 63 61 6c 6c 4f 75 |(m: Movi|e;callOu|
|00001c30| 74 50 72 6f 63 3a 20 4d | 6f 76 69 65 50 72 65 76 |tProc: M|oviePrev|
|00001c40| 69 65 77 43 61 6c 6c 4f | 75 74 50 72 6f 63 3b 0d |iewCallO|utProc;.|
|00001c50| 20 72 65 66 63 6f 6e 3a | 20 4c 4f 4e 47 49 4e 54 | refcon:| LONGINT|
|00001c60| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00001c70| 2c 24 46 32 2c 24 41 41 | 41 41 3b 0d 0d 0d 7b 20 |,$F2,$AA|AA;...{ |
|00001c80| 20 4d 6f 76 69 65 20 50 | 49 43 54 20 52 6f 75 74 | Movie P|ICT Rout|
|00001c90| 69 6e 65 73 20 20 7d 0d | 46 55 4e 43 54 49 4f 4e |ines  }.|FUNCTION|
|00001ca0| 20 47 65 74 4d 6f 76 69 | 65 50 69 63 74 28 6d 3a | GetMovi|ePict(m:|
|00001cb0| 20 4d 6f 76 69 65 3b 74 | 69 6d 65 3a 20 54 69 6d | Movie;t|ime: Tim|
|00001cc0| 65 56 61 6c 75 65 29 3a | 20 50 69 63 48 61 6e 64 |eValue):| PicHand|
|00001cd0| 6c 65 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |le;. INL|INE $303|
|00001ce0| 43 2c 24 31 44 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$1D,$A|AAA;.FUN|
|00001cf0| 43 54 49 4f 4e 20 47 65 | 74 54 72 61 63 6b 50 69 |CTION Ge|tTrackPi|
|00001d00| 63 74 28 74 3a 20 54 72 | 61 63 6b 3b 74 69 6d 65 |ct(t: Tr|ack;time|
|00001d10| 3a 20 54 69 6d 65 56 61 | 6c 75 65 29 3a 20 50 69 |: TimeVa|lue): Pi|
|00001d20| 63 48 61 6e 64 6c 65 3b | 0d 20 49 4e 4c 49 4e 45 |cHandle;|. INLINE|
|00001d30| 20 24 33 30 33 43 2c 24 | 31 45 2c 24 41 41 41 41 | $303C,$|1E,$AAAA|
|00001d40| 3b 0d 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 4d |;..FUNCT|ION GetM|
|00001d50| 6f 76 69 65 50 6f 73 74 | 65 72 50 69 63 74 28 6d |oviePost|erPict(m|
|00001d60| 3a 20 4d 6f 76 69 65 29 | 3a 20 50 69 63 48 61 6e |: Movie)|: PicHan|
|00001d70| 64 6c 65 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |dle;. IN|LINE $30|
|00001d80| 33 43 2c 24 46 37 2c 24 | 41 41 41 41 3b 0d 0d 0d |3C,$F7,$|AAAA;...|
|00001d90| 7b 20 20 6d 6f 76 69 65 | 20 54 69 6d 65 42 61 73 |{  movie| TimeBas|
|00001da0| 65 20 52 6f 75 74 69 6e | 65 73 20 20 7d 0d 46 55 |e Routin|es  }.FU|
|00001db0| 4e 43 54 49 4f 4e 20 47 | 65 74 4d 6f 76 69 65 54 |NCTION G|etMovieT|
|00001dc0| 69 6d 65 42 61 73 65 28 | 6d 3a 20 4d 6f 76 69 65 |imeBase(|m: Movie|
|00001dd0| 29 3a 20 54 69 6d 65 42 | 61 73 65 3b 0d 20 49 4e |): TimeB|ase;. IN|
|00001de0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 31 32 2c 24 |LINE $30|3C,$12,$|
|00001df0| 41 41 41 41 3b 0d 0d 50 | 52 4f 43 45 44 55 52 45 |AAAA;..P|ROCEDURE|
|00001e00| 20 53 65 74 4d 6f 76 69 | 65 4d 61 73 74 65 72 54 | SetMovi|eMasterT|
|00001e10| 69 6d 65 42 61 73 65 28 | 6d 3a 20 4d 6f 76 69 65 |imeBase(|m: Movie|
|00001e20| 3b 74 62 3a 20 54 69 6d | 65 42 61 73 65 3b 73 6c |;tb: Tim|eBase;sl|
|00001e30| 61 76 65 5a 65 72 6f 3a | 20 54 69 6d 65 52 65 63 |aveZero:| TimeRec|
|00001e40| 6f 72 64 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |ord);. I|NLINE $3|
|00001e50| 30 33 43 2c 24 31 36 37 | 2c 24 41 41 41 41 3b 0d |03C,$167|,$AAAA;.|
|00001e60| 50 52 4f 43 45 44 55 52 | 45 20 53 65 74 4d 6f 76 |PROCEDUR|E SetMov|
|00001e70| 69 65 4d 61 73 74 65 72 | 43 6c 6f 63 6b 28 6d 3a |ieMaster|Clock(m:|
|00001e80| 20 4d 6f 76 69 65 3b 63 | 6c 6f 63 6b 4d 65 69 73 | Movie;c|lockMeis|
|00001e90| 74 65 72 3a 20 43 6f 6d | 70 6f 6e 65 6e 74 3b 73 |ter: Com|ponent;s|
|00001ea0| 6c 61 76 65 5a 65 72 6f | 3a 20 54 69 6d 65 52 65 |laveZero|: TimeRe|
|00001eb0| 63 6f 72 64 29 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |cord);. |INLINE $|
|00001ec0| 33 30 33 43 2c 24 31 36 | 38 2c 24 41 41 41 41 3b |303C,$16|8,$AAAA;|
|00001ed0| 0d 0d 0d 7b 20 20 73 70 | 61 74 69 61 6c 20 6d 6f |...{  sp|atial mo|
|00001ee0| 76 69 65 20 52 6f 75 74 | 69 6e 65 73 20 20 7d 0d |vie Rout|ines  }.|
|00001ef0| 50 52 4f 43 45 44 55 52 | 45 20 47 65 74 4d 6f 76 |PROCEDUR|E GetMov|
|00001f00| 69 65 42 6f 78 28 6d 3a | 20 4d 6f 76 69 65 3b 56 |ieBox(m:| Movie;V|
|00001f10| 41 52 20 62 6f 78 52 65 | 63 74 3a 20 52 65 63 74 |AR boxRe|ct: Rect|
|00001f20| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00001f30| 2c 24 46 39 2c 24 41 41 | 41 41 3b 0d 50 52 4f 43 |,$F9,$AA|AA;.PROC|
|00001f40| 45 44 55 52 45 20 53 65 | 74 4d 6f 76 69 65 42 6f |EDURE Se|tMovieBo|
|00001f50| 78 28 6d 3a 20 4d 6f 76 | 69 65 3b 62 6f 78 52 65 |x(m: Mov|ie;boxRe|
|00001f60| 63 74 3a 20 52 65 63 74 | 29 3b 0d 20 49 4e 4c 49 |ct: Rect|);. INLI|
|00001f70| 4e 45 20 24 33 30 33 43 | 2c 24 46 41 2c 24 41 41 |NE $303C|,$FA,$AA|
|00001f80| 41 41 3b 0d 0d 0d 7b 20 | 20 6d 6f 76 69 65 20 64 |AA;...{ | movie d|
|00001f90| 69 73 70 6c 61 79 20 63 | 6c 69 70 20 20 7d 0d 46 |isplay c|lip  }.F|
|00001fa0| 55 4e 43 54 49 4f 4e 20 | 47 65 74 4d 6f 76 69 65 |UNCTION |GetMovie|
|00001fb0| 44 69 73 70 6c 61 79 43 | 6c 69 70 52 67 6e 28 6d |DisplayC|lipRgn(m|
|00001fc0| 3a 20 4d 6f 76 69 65 29 | 3a 20 52 67 6e 48 61 6e |: Movie)|: RgnHan|
|00001fd0| 64 6c 65 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |dle;. IN|LINE $30|
|00001fe0| 33 43 2c 24 46 43 2c 24 | 41 41 41 41 3b 0d 50 52 |3C,$FC,$|AAAA;.PR|
|00001ff0| 4f 43 45 44 55 52 45 20 | 53 65 74 4d 6f 76 69 65 |OCEDURE |SetMovie|
|00002000| 44 69 73 70 6c 61 79 43 | 6c 69 70 52 67 6e 28 6d |DisplayC|lipRgn(m|
|00002010| 3a 20 4d 6f 76 69 65 3b | 74 68 65 43 6c 69 70 3a |: Movie;|theClip:|
|00002020| 20 52 67 6e 48 61 6e 64 | 6c 65 29 3b 0d 20 49 4e | RgnHand|le);. IN|
|00002030| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 46 44 2c 24 |LINE $30|3C,$FD,$|
|00002040| 41 41 41 41 3b 0d 0d 0d | 7b 20 20 6d 6f 76 69 65 |AAAA;...|{  movie|
|00002050| 20 63 6c 69 70 20 20 7d | 0d 46 55 4e 43 54 49 4f | clip  }|.FUNCTIO|
|00002060| 4e 20 47 65 74 4d 6f 76 | 69 65 43 6c 69 70 52 67 |N GetMov|ieClipRg|
|00002070| 6e 28 6d 3a 20 4d 6f 76 | 69 65 29 3a 20 52 67 6e |n(m: Mov|ie): Rgn|
|00002080| 48 61 6e 64 6c 65 3b 0d | 20 49 4e 4c 49 4e 45 20 |Handle;.| INLINE |
|00002090| 24 33 30 33 43 2c 24 31 | 30 30 2c 24 41 41 41 41 |$303C,$1|00,$AAAA|
|000020a0| 3b 0d 50 52 4f 43 45 44 | 55 52 45 20 53 65 74 4d |;.PROCED|URE SetM|
|000020b0| 6f 76 69 65 43 6c 69 70 | 52 67 6e 28 6d 3a 20 4d |ovieClip|Rgn(m: M|
|000020c0| 6f 76 69 65 3b 74 68 65 | 43 6c 69 70 3a 20 52 67 |ovie;the|Clip: Rg|
|000020d0| 6e 48 61 6e 64 6c 65 29 | 3b 0d 20 49 4e 4c 49 4e |nHandle)|;. INLIN|
|000020e0| 45 20 24 33 30 33 43 2c | 24 31 30 31 2c 24 41 41 |E $303C,|$101,$AA|
|000020f0| 41 41 3b 0d 0d 0d 7b 20 | 20 74 72 61 63 6b 20 63 |AA;...{ | track c|
|00002100| 6c 69 70 20 20 7d 0d 46 | 55 4e 43 54 49 4f 4e 20 |lip  }.F|UNCTION |
|00002110| 47 65 74 54 72 61 63 6b | 43 6c 69 70 52 67 6e 28 |GetTrack|ClipRgn(|
|00002120| 74 3a 20 54 72 61 63 6b | 29 3a 20 52 67 6e 48 61 |t: Track|): RgnHa|
|00002130| 6e 64 6c 65 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |ndle;. I|NLINE $3|
|00002140| 30 33 43 2c 24 31 30 32 | 2c 24 41 41 41 41 3b 0d |03C,$102|,$AAAA;.|
|00002150| 50 52 4f 43 45 44 55 52 | 45 20 53 65 74 54 72 61 |PROCEDUR|E SetTra|
|00002160| 63 6b 43 6c 69 70 52 67 | 6e 28 74 3a 20 54 72 61 |ckClipRg|n(t: Tra|
|00002170| 63 6b 3b 74 68 65 43 6c | 69 70 3a 20 52 67 6e 48 |ck;theCl|ip: RgnH|
|00002180| 61 6e 64 6c 65 29 3b 0d | 20 49 4e 4c 49 4e 45 20 |andle);.| INLINE |
|00002190| 24 33 30 33 43 2c 24 31 | 30 33 2c 24 41 41 41 41 |$303C,$1|03,$AAAA|
|000021a0| 3b 0d 0d 0d 7b 20 20 62 | 6f 75 6e 64 73 20 69 6e |;...{  b|ounds in|
|000021b0| 20 64 69 73 70 6c 61 79 | 20 73 70 61 63 65 20 20 | display| space  |
|000021c0| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 47 65 74 4d 6f |}.FUNCTI|ON GetMo|
|000021d0| 76 69 65 44 69 73 70 6c | 61 79 42 6f 75 6e 64 73 |vieDispl|ayBounds|
|000021e0| 52 67 6e 28 6d 3a 20 4d | 6f 76 69 65 29 3a 20 52 |Rgn(m: M|ovie): R|
|000021f0| 67 6e 48 61 6e 64 6c 65 | 3b 0d 20 49 4e 4c 49 4e |gnHandle|;. INLIN|
|00002200| 45 20 24 33 30 33 43 2c | 24 46 42 2c 24 41 41 41 |E $303C,|$FB,$AAA|
|00002210| 41 3b 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 54 |A;.FUNCT|ION GetT|
|00002220| 72 61 63 6b 44 69 73 70 | 6c 61 79 42 6f 75 6e 64 |rackDisp|layBound|
|00002230| 73 52 67 6e 28 74 3a 20 | 54 72 61 63 6b 29 3a 20 |sRgn(t: |Track): |
|00002240| 52 67 6e 48 61 6e 64 6c | 65 3b 0d 20 49 4e 4c 49 |RgnHandl|e;. INLI|
|00002250| 4e 45 20 24 33 30 33 43 | 2c 24 31 31 32 2c 24 41 |NE $303C|,$112,$A|
|00002260| 41 41 41 3b 0d 0d 0d 7b | 20 20 62 6f 75 6e 64 73 |AAA;...{|  bounds|
|00002270| 20 69 6e 20 6d 6f 76 69 | 65 20 73 70 61 63 65 20 | in movi|e space |
|00002280| 20 7d 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 4d | }.FUNCT|ION GetM|
|00002290| 6f 76 69 65 42 6f 75 6e | 64 73 52 67 6e 28 6d 3a |ovieBoun|dsRgn(m:|
|000022a0| 20 4d 6f 76 69 65 29 3a | 20 52 67 6e 48 61 6e 64 | Movie):| RgnHand|
|000022b0| 6c 65 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |le;. INL|INE $303|
|000022c0| 43 2c 24 46 45 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$FE,$A|AAA;.FUN|
|000022d0| 43 54 49 4f 4e 20 47 65 | 74 54 72 61 63 6b 4d 6f |CTION Ge|tTrackMo|
|000022e0| 76 69 65 42 6f 75 6e 64 | 73 52 67 6e 28 74 3a 20 |vieBound|sRgn(t: |
|000022f0| 54 72 61 63 6b 29 3a 20 | 52 67 6e 48 61 6e 64 6c |Track): |RgnHandl|
|00002300| 65 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |e;. INLI|NE $303C|
|00002310| 2c 24 46 46 2c 24 41 41 | 41 41 3b 0d 0d 0d 7b 20 |,$FF,$AA|AA;...{ |
|00002320| 20 62 6f 75 6e 64 73 20 | 69 6e 20 74 72 61 63 6b | bounds |in track|
|00002330| 20 73 70 61 63 65 20 20 | 7d 0d 46 55 4e 43 54 49 | space  |}.FUNCTI|
|00002340| 4f 4e 20 47 65 74 54 72 | 61 63 6b 42 6f 75 6e 64 |ON GetTr|ackBound|
|00002350| 73 52 67 6e 28 74 3a 20 | 54 72 61 63 6b 29 3a 20 |sRgn(t: |Track): |
|00002360| 52 67 6e 48 61 6e 64 6c | 65 3b 0d 20 49 4e 4c 49 |RgnHandl|e;. INLI|
|00002370| 4e 45 20 24 33 30 33 43 | 2c 24 31 31 31 2c 24 41 |NE $303C|,$111,$A|
|00002380| 41 41 41 3b 0d 0d 0d 7b | 20 20 6d 6f 76 69 65 20 |AAA;...{|  movie |
|00002390| 70 6f 73 74 65 72 20 62 | 6f 78 20 20 7d 0d 50 52 |poster b|ox  }.PR|
|000023a0| 4f 43 45 44 55 52 45 20 | 47 65 74 50 6f 73 74 65 |OCEDURE |GetPoste|
|000023b0| 72 42 6f 78 28 6d 3a 20 | 4d 6f 76 69 65 3b 56 41 |rBox(m: |Movie;VA|
|000023c0| 52 20 62 6f 78 52 65 63 | 74 3a 20 52 65 63 74 29 |R boxRec|t: Rect)|
|000023d0| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|000023e0| 24 31 36 46 2c 24 41 41 | 41 41 3b 0d 50 52 4f 43 |$16F,$AA|AA;.PROC|
|000023f0| 45 44 55 52 45 20 53 65 | 74 50 6f 73 74 65 72 42 |EDURE Se|tPosterB|
|00002400| 6f 78 28 6d 3a 20 4d 6f | 76 69 65 3b 62 6f 78 52 |ox(m: Mo|vie;boxR|
|00002410| 65 63 74 3a 20 52 65 63 | 74 29 3b 0d 20 49 4e 4c |ect: Rec|t);. INL|
|00002420| 49 4e 45 20 24 33 30 33 | 43 2c 24 31 37 30 2c 24 |INE $303|C,$170,$|
|00002430| 41 41 41 41 3b 0d 0d 0d | 7b 20 20 6d 6f 76 69 65 |AAAA;...|{  movie|
|00002440| 2f 74 72 61 63 6b 20 62 | 6f 75 6e 64 73 20 6f 76 |/track b|ounds ov|
|00002450| 65 72 20 61 20 72 61 6e | 67 65 20 6f 66 20 74 69 |er a ran|ge of ti|
|00002460| 6d 65 20 20 7d 0d 46 55 | 4e 43 54 49 4f 4e 20 47 |me  }.FU|NCTION G|
|00002470| 65 74 4d 6f 76 69 65 53 | 65 67 6d 65 6e 74 44 69 |etMovieS|egmentDi|
|00002480| 73 70 6c 61 79 42 6f 75 | 6e 64 73 52 67 6e 28 6d |splayBou|ndsRgn(m|
|00002490| 3a 20 4d 6f 76 69 65 3b | 74 69 6d 65 3a 20 54 69 |: Movie;|time: Ti|
|000024a0| 6d 65 56 61 6c 75 65 3b | 64 75 72 61 74 69 6f 6e |meValue;|duration|
|000024b0| 3a 20 54 69 6d 65 56 61 | 6c 75 65 29 3a 20 52 67 |: TimeVa|lue): Rg|
|000024c0| 6e 48 61 6e 64 6c 65 3b | 0d 20 49 4e 4c 49 4e 45 |nHandle;|. INLINE|
|000024d0| 20 24 33 30 33 43 2c 24 | 31 36 43 2c 24 41 41 41 | $303C,$|16C,$AAA|
|000024e0| 41 3b 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 54 |A;.FUNCT|ION GetT|
|000024f0| 72 61 63 6b 53 65 67 6d | 65 6e 74 44 69 73 70 6c |rackSegm|entDispl|
|00002500| 61 79 42 6f 75 6e 64 73 | 52 67 6e 28 74 3a 20 54 |ayBounds|Rgn(t: T|
|00002510| 72 61 63 6b 3b 74 69 6d | 65 3a 20 54 69 6d 65 56 |rack;tim|e: TimeV|
|00002520| 61 6c 75 65 3b 0d 20 64 | 75 72 61 74 69 6f 6e 3a |alue;. d|uration:|
|00002530| 20 54 69 6d 65 56 61 6c | 75 65 29 3a 20 52 67 6e | TimeVal|ue): Rgn|
|00002540| 48 61 6e 64 6c 65 3b 0d | 20 49 4e 4c 49 4e 45 20 |Handle;.| INLINE |
|00002550| 24 33 30 33 43 2c 24 31 | 36 42 2c 24 41 41 41 41 |$303C,$1|6B,$AAAA|
|00002560| 3b 0d 0d 50 52 4f 43 45 | 44 55 52 45 20 53 65 74 |;..PROCE|DURE Set|
|00002570| 4d 6f 76 69 65 43 6f 76 | 65 72 50 72 6f 63 73 28 |MovieCov|erProcs(|
|00002580| 6d 3a 20 4d 6f 76 69 65 | 3b 75 6e 63 6f 76 65 72 |m: Movie|;uncover|
|00002590| 50 72 6f 63 3a 20 4d 6f | 76 69 65 52 67 6e 43 6f |Proc: Mo|vieRgnCo|
|000025a0| 76 65 72 50 72 6f 63 3b | 63 6f 76 65 72 50 72 6f |verProc;|coverPro|
|000025b0| 63 3a 20 4d 6f 76 69 65 | 52 67 6e 43 6f 76 65 72 |c: Movie|RgnCover|
|000025c0| 50 72 6f 63 3b 0d 20 72 | 65 66 43 6f 6e 3a 20 4c |Proc;. r|efCon: L|
|000025d0| 4f 4e 47 49 4e 54 29 3b | 0d 20 49 4e 4c 49 4e 45 |ONGINT);|. INLINE|
|000025e0| 20 24 33 30 33 43 2c 24 | 31 37 39 2c 24 41 41 41 | $303C,$|179,$AAA|
|000025f0| 41 3b 0d 0d 0d 7b 20 20 | 6d 61 74 74 65 73 20 2d |A;...{  |mattes -|
|00002600| 20 61 6c 77 61 79 73 20 | 69 6e 20 74 72 61 63 6b | always |in track|
|00002610| 20 73 70 61 63 65 20 20 | 7d 0d 46 55 4e 43 54 49 | space  |}.FUNCTI|
|00002620| 4f 4e 20 47 65 74 54 72 | 61 63 6b 4d 61 74 74 65 |ON GetTr|ackMatte|
|00002630| 28 74 3a 20 54 72 61 63 | 6b 29 3a 20 50 69 78 4d |(t: Trac|k): PixM|
|00002640| 61 70 48 61 6e 64 6c 65 | 3b 0d 20 49 4e 4c 49 4e |apHandle|;. INLIN|
|00002650| 45 20 24 33 30 33 43 2c | 24 31 31 35 2c 24 41 41 |E $303C,|$115,$AA|
|00002660| 41 41 3b 0d 50 52 4f 43 | 45 44 55 52 45 20 53 65 |AA;.PROC|EDURE Se|
|00002670| 74 54 72 61 63 6b 4d 61 | 74 74 65 28 74 3a 20 54 |tTrackMa|tte(t: T|
|00002680| 72 61 63 6b 3b 74 68 65 | 4d 61 74 74 65 3a 20 50 |rack;the|Matte: P|
|00002690| 69 78 4d 61 70 48 61 6e | 64 6c 65 29 3b 0d 20 49 |ixMapHan|dle);. I|
|000026a0| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 31 31 36 |NLINE $3|03C,$116|
|000026b0| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|000026c0| 45 20 44 69 73 70 6f 73 | 65 4d 61 74 74 65 28 74 |E Dispos|eMatte(t|
|000026d0| 68 65 4d 61 74 74 65 3a | 20 50 69 78 4d 61 70 48 |heMatte:| PixMapH|
|000026e0| 61 6e 64 6c 65 29 3b 0d | 20 49 4e 4c 49 4e 45 20 |andle);.| INLINE |
|000026f0| 24 33 30 33 43 2c 24 31 | 34 41 2c 24 41 41 41 41 |$303C,$1|4A,$AAAA|
|00002700| 3b 0d 0d 0d 7b 20 20 6d | 6f 76 69 65 20 63 72 65 |;...{  m|ovie cre|
|00002710| 61 74 69 6f 6e 20 52 6f | 75 74 69 6e 65 73 20 20 |ation Ro|utines  |
|00002720| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 4e 65 77 4d 6f |}.FUNCTI|ON NewMo|
|00002730| 76 69 65 46 72 6f 6d 48 | 61 6e 64 6c 65 28 56 41 |vieFromH|andle(VA|
|00002740| 52 20 6d 3a 4d 6f 76 69 | 65 3b 20 68 3a 20 48 61 |R m:Movi|e; h: Ha|
|00002750| 6e 64 6c 65 3b 6e 65 77 | 4d 6f 76 69 65 46 6c 61 |ndle;new|MovieFla|
|00002760| 67 73 3a 20 49 4e 54 45 | 47 45 52 3b 56 41 52 20 |gs: INTE|GER;VAR |
|00002770| 64 61 74 61 52 65 66 57 | 61 73 43 68 61 6e 67 65 |dataRefW|asChange|
|00002780| 64 3a 20 42 4f 4f 4c 45 | 41 4e 29 3a 20 4f 53 45 |d: BOOLE|AN): OSE|
|00002790| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|000027a0| 43 2c 24 46 31 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$F1,$A|AAA;.FUN|
|000027b0| 43 54 49 4f 4e 20 50 75 | 74 4d 6f 76 69 65 49 6e |CTION Pu|tMovieIn|
|000027c0| 74 6f 48 61 6e 64 6c 65 | 28 6d 3a 20 4d 6f 76 69 |toHandle|(m: Movi|
|000027d0| 65 3b 68 3a 20 48 61 6e | 64 6c 65 29 3a 20 4f 53 |e;h: Han|dle): OS|
|000027e0| 45 72 72 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |Err;. IN|LINE $30|
|000027f0| 33 43 2c 24 32 32 2c 24 | 41 41 41 41 3b 0d 46 55 |3C,$22,$|AAAA;.FU|
|00002800| 4e 43 54 49 4f 4e 20 4e | 65 77 4d 6f 76 69 65 46 |NCTION N|ewMovieF|
|00002810| 72 6f 6d 44 61 74 61 46 | 6f 72 6b 28 56 41 52 20 |romDataF|ork(VAR |
|00002820| 6d 3a 4d 6f 76 69 65 3b | 20 66 52 65 66 4e 75 6d |m:Movie;| fRefNum|
|00002830| 3a 20 49 4e 54 45 47 45 | 52 3b 20 66 69 6c 65 4f |: INTEGE|R; fileO|
|00002840| 66 66 73 65 74 3a 20 4c | 4f 4e 47 49 4e 54 3b 0d |ffset: L|ONGINT;.|
|00002850| 20 66 6c 61 67 73 3a 20 | 49 4e 54 45 47 45 52 3b | flags: |INTEGER;|
|00002860| 20 56 41 52 20 64 61 74 | 61 52 65 66 57 61 73 43 | VAR dat|aRefWasC|
|00002870| 68 61 6e 67 65 64 3a 20 | 42 4f 4f 4c 45 41 4e 29 |hanged: |BOOLEAN)|
|00002880| 3a 20 4f 53 45 72 72 3b | 0d 20 49 4e 4c 49 4e 45 |: OSErr;|. INLINE|
|00002890| 20 24 33 30 33 43 2c 24 | 31 31 30 2c 24 41 41 41 | $303C,$|110,$AAA|
|000028a0| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 4e 65 77 |A;..FUNC|TION New|
|000028b0| 4d 6f 76 69 65 28 6e 65 | 77 4d 6f 76 69 65 46 6c |Movie(ne|wMovieFl|
|000028c0| 61 67 73 3a 20 4c 4f 4e | 47 49 4e 54 29 3a 20 4d |ags: LON|GINT): M|
|000028d0| 6f 76 69 65 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |ovie;. I|NLINE $3|
|000028e0| 30 33 43 2c 24 31 38 37 | 2c 24 41 41 41 41 3b 0d |03C,$187|,$AAAA;.|
|000028f0| 50 52 4f 43 45 44 55 52 | 45 20 44 69 73 70 6f 73 |PROCEDUR|E Dispos|
|00002900| 65 4d 6f 76 69 65 28 6d | 3a 20 4d 6f 76 69 65 29 |eMovie(m|: Movie)|
|00002910| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00002920| 24 32 33 2c 24 41 41 41 | 41 3b 0d 0d 0d 7b 20 20 |$23,$AAA|A;...{  |
|00002930| 4d 6f 76 69 65 20 52 6f | 75 74 69 6e 65 73 20 20 |Movie Ro|utines  |
|00002940| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 47 65 74 4d 6f |}.FUNCTI|ON GetMo|
|00002950| 76 69 65 43 72 65 61 74 | 69 6f 6e 54 69 6d 65 28 |vieCreat|ionTime(|
|00002960| 6d 3a 20 4d 6f 76 69 65 | 29 3a 20 4c 4f 4e 47 49 |m: Movie|): LONGI|
|00002970| 4e 54 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |NT;. INL|INE $303|
|00002980| 43 2c 24 32 36 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$26,$A|AAA;.FUN|
|00002990| 43 54 49 4f 4e 20 47 65 | 74 4d 6f 76 69 65 4d 6f |CTION Ge|tMovieMo|
|000029a0| 64 69 66 69 63 61 74 69 | 6f 6e 54 69 6d 65 28 6d |dificati|onTime(m|
|000029b0| 3a 20 4d 6f 76 69 65 29 | 3a 20 4c 4f 4e 47 49 4e |: Movie)|: LONGIN|
|000029c0| 54 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |T;. INLI|NE $303C|
|000029d0| 2c 24 32 37 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$27,$AA|AA;..FUN|
|000029e0| 43 54 49 4f 4e 20 47 65 | 74 4d 6f 76 69 65 54 69 |CTION Ge|tMovieTi|
|000029f0| 6d 65 53 63 61 6c 65 28 | 6d 3a 20 4d 6f 76 69 65 |meScale(|m: Movie|
|00002a00| 29 3a 20 54 69 6d 65 53 | 63 61 6c 65 3b 0d 20 49 |): TimeS|cale;. I|
|00002a10| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 32 39 2c |NLINE $3|03C,$29,|
|00002a20| 24 41 41 41 41 3b 0d 50 | 52 4f 43 45 44 55 52 45 |$AAAA;.P|ROCEDURE|
|00002a30| 20 53 65 74 4d 6f 76 69 | 65 54 69 6d 65 53 63 61 | SetMovi|eTimeSca|
|00002a40| 6c 65 28 6d 3a 20 4d 6f | 76 69 65 3b 74 69 6d 65 |le(m: Mo|vie;time|
|00002a50| 53 63 61 6c 65 3a 20 54 | 69 6d 65 53 63 61 6c 65 |Scale: T|imeScale|
|00002a60| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00002a70| 2c 24 32 41 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$2A,$AA|AA;..FUN|
|00002a80| 43 54 49 4f 4e 20 47 65 | 74 4d 6f 76 69 65 44 75 |CTION Ge|tMovieDu|
|00002a90| 72 61 74 69 6f 6e 28 6d | 3a 20 4d 6f 76 69 65 29 |ration(m|: Movie)|
|00002aa0| 3a 20 54 69 6d 65 56 61 | 6c 75 65 3b 0d 20 49 4e |: TimeVa|lue;. IN|
|00002ab0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 32 42 2c 24 |LINE $30|3C,$2B,$|
|00002ac0| 41 41 41 41 3b 0d 0d 46 | 55 4e 43 54 49 4f 4e 20 |AAAA;..F|UNCTION |
|00002ad0| 47 65 74 4d 6f 76 69 65 | 52 61 74 65 28 6d 3a 20 |GetMovie|Rate(m: |
|00002ae0| 4d 6f 76 69 65 29 3a 20 | 46 69 78 65 64 3b 0d 20 |Movie): |Fixed;. |
|00002af0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 32 43 |INLINE $|303C,$2C|
|00002b00| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00002b10| 45 20 53 65 74 4d 6f 76 | 69 65 52 61 74 65 28 6d |E SetMov|ieRate(m|
|00002b20| 3a 20 4d 6f 76 69 65 3b | 72 61 74 65 3a 20 46 69 |: Movie;|rate: Fi|
|00002b30| 78 65 64 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |xed);. I|NLINE $3|
|00002b40| 30 33 43 2c 24 32 44 2c | 24 41 41 41 41 3b 0d 0d |03C,$2D,|$AAAA;..|
|00002b50| 46 55 4e 43 54 49 4f 4e | 20 47 65 74 4d 6f 76 69 |FUNCTION| GetMovi|
|00002b60| 65 50 72 65 66 65 72 72 | 65 64 52 61 74 65 28 6d |ePreferr|edRate(m|
|00002b70| 3a 20 4d 6f 76 69 65 29 | 3a 20 46 69 78 65 64 3b |: Movie)|: Fixed;|
|00002b80| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00002b90| 46 33 2c 24 41 41 41 41 | 3b 0d 50 52 4f 43 45 44 |F3,$AAAA|;.PROCED|
|00002ba0| 55 52 45 20 53 65 74 4d | 6f 76 69 65 50 72 65 66 |URE SetM|oviePref|
|00002bb0| 65 72 72 65 64 52 61 74 | 65 28 6d 3a 20 4d 6f 76 |erredRat|e(m: Mov|
|00002bc0| 69 65 3b 72 61 74 65 3a | 20 46 69 78 65 64 29 3b |ie;rate:| Fixed);|
|00002bd0| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00002be0| 46 34 2c 24 41 41 41 41 | 3b 0d 0d 46 55 4e 43 54 |F4,$AAAA|;..FUNCT|
|00002bf0| 49 4f 4e 20 47 65 74 4d | 6f 76 69 65 50 72 65 66 |ION GetM|oviePref|
|00002c00| 65 72 72 65 64 56 6f 6c | 75 6d 65 28 6d 3a 20 4d |erredVol|ume(m: M|
|00002c10| 6f 76 69 65 29 3a 20 49 | 4e 54 45 47 45 52 3b 0d |ovie): I|NTEGER;.|
|00002c20| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 46 | INLINE |$303C,$F|
|00002c30| 35 2c 24 41 41 41 41 3b | 0d 50 52 4f 43 45 44 55 |5,$AAAA;|.PROCEDU|
|00002c40| 52 45 20 53 65 74 4d 6f | 76 69 65 50 72 65 66 65 |RE SetMo|viePrefe|
|00002c50| 72 72 65 64 56 6f 6c 75 | 6d 65 28 6d 3a 20 4d 6f |rredVolu|me(m: Mo|
|00002c60| 76 69 65 3b 76 6f 6c 75 | 6d 65 3a 20 49 4e 54 45 |vie;volu|me: INTE|
|00002c70| 47 45 52 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |GER);. I|NLINE $3|
|00002c80| 30 33 43 2c 24 46 36 2c | 24 41 41 41 41 3b 0d 0d |03C,$F6,|$AAAA;..|
|00002c90| 46 55 4e 43 54 49 4f 4e | 20 47 65 74 4d 6f 76 69 |FUNCTION| GetMovi|
|00002ca0| 65 56 6f 6c 75 6d 65 28 | 6d 3a 20 4d 6f 76 69 65 |eVolume(|m: Movie|
|00002cb0| 29 3a 20 49 4e 54 45 47 | 45 52 3b 0d 20 49 4e 4c |): INTEG|ER;. INL|
|00002cc0| 49 4e 45 20 24 33 30 33 | 43 2c 24 32 45 2c 24 41 |INE $303|C,$2E,$A|
|00002cd0| 41 41 41 3b 0d 50 52 4f | 43 45 44 55 52 45 20 53 |AAA;.PRO|CEDURE S|
|00002ce0| 65 74 4d 6f 76 69 65 56 | 6f 6c 75 6d 65 28 6d 3a |etMovieV|olume(m:|
|00002cf0| 20 4d 6f 76 69 65 3b 76 | 6f 6c 75 6d 65 3a 20 49 | Movie;v|olume: I|
|00002d00| 4e 54 45 47 45 52 29 3b | 0d 20 49 4e 4c 49 4e 45 |NTEGER);|. INLINE|
|00002d10| 20 24 33 30 33 43 2c 24 | 32 46 2c 24 41 41 41 41 | $303C,$|2F,$AAAA|
|00002d20| 3b 0d 0d 50 52 4f 43 45 | 44 55 52 45 20 47 65 74 |;..PROCE|DURE Get|
|00002d30| 4d 6f 76 69 65 4d 61 74 | 72 69 78 28 6d 3a 20 4d |MovieMat|rix(m: M|
|00002d40| 6f 76 69 65 3b 56 41 52 | 20 6d 61 74 72 69 78 3a |ovie;VAR| matrix:|
|00002d50| 20 4d 61 74 72 69 78 52 | 65 63 6f 72 64 29 3b 0d | MatrixR|ecord);.|
|00002d60| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 33 | INLINE |$303C,$3|
|00002d70| 31 2c 24 41 41 41 41 3b | 0d 50 52 4f 43 45 44 55 |1,$AAAA;|.PROCEDU|
|00002d80| 52 45 20 53 65 74 4d 6f | 76 69 65 4d 61 74 72 69 |RE SetMo|vieMatri|
|00002d90| 78 28 6d 3a 20 4d 6f 76 | 69 65 3b 6d 61 74 72 69 |x(m: Mov|ie;matri|
|00002da0| 78 3a 20 4d 61 74 72 69 | 78 52 65 63 6f 72 64 29 |x: Matri|xRecord)|
|00002db0| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00002dc0| 24 33 32 2c 24 41 41 41 | 41 3b 0d 0d 50 52 4f 43 |$32,$AAA|A;..PROC|
|00002dd0| 45 44 55 52 45 20 47 65 | 74 4d 6f 76 69 65 50 72 |EDURE Ge|tMoviePr|
|00002de0| 65 76 69 65 77 54 69 6d | 65 28 6d 3a 20 4d 6f 76 |eviewTim|e(m: Mov|
|00002df0| 69 65 3b 56 41 52 20 70 | 72 65 76 69 65 77 54 69 |ie;VAR p|reviewTi|
|00002e00| 6d 65 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 56 41 |me: Time|Value;VA|
|00002e10| 52 20 70 72 65 76 69 65 | 77 44 75 72 61 74 69 6f |R previe|wDuratio|
|00002e20| 6e 3a 20 54 69 6d 65 56 | 61 6c 75 65 29 3b 0d 20 |n: TimeV|alue);. |
|00002e30| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 33 33 |INLINE $|303C,$33|
|00002e40| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00002e50| 45 20 53 65 74 4d 6f 76 | 69 65 50 72 65 76 69 65 |E SetMov|iePrevie|
|00002e60| 77 54 69 6d 65 28 6d 3a | 20 4d 6f 76 69 65 3b 70 |wTime(m:| Movie;p|
|00002e70| 72 65 76 69 65 77 54 69 | 6d 65 3a 20 54 69 6d 65 |reviewTi|me: Time|
|00002e80| 56 61 6c 75 65 3b 70 72 | 65 76 69 65 77 44 75 72 |Value;pr|eviewDur|
|00002e90| 61 74 69 6f 6e 3a 20 54 | 69 6d 65 56 61 6c 75 65 |ation: T|imeValue|
|00002ea0| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00002eb0| 2c 24 33 34 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$34,$AA|AA;..FUN|
|00002ec0| 43 54 49 4f 4e 20 47 65 | 74 4d 6f 76 69 65 50 6f |CTION Ge|tMoviePo|
|00002ed0| 73 74 65 72 54 69 6d 65 | 28 6d 3a 20 4d 6f 76 69 |sterTime|(m: Movi|
|00002ee0| 65 29 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 0d 20 |e): Time|Value;. |
|00002ef0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 33 35 |INLINE $|303C,$35|
|00002f00| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00002f10| 45 20 53 65 74 4d 6f 76 | 69 65 50 6f 73 74 65 72 |E SetMov|iePoster|
|00002f20| 54 69 6d 65 28 6d 3a 20 | 4d 6f 76 69 65 3b 70 6f |Time(m: |Movie;po|
|00002f30| 73 74 65 72 54 69 6d 65 | 3a 20 54 69 6d 65 56 61 |sterTime|: TimeVa|
|00002f40| 6c 75 65 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |lue);. I|NLINE $3|
|00002f50| 30 33 43 2c 24 33 36 2c | 24 41 41 41 41 3b 0d 0d |03C,$36,|$AAAA;..|
|00002f60| 50 52 4f 43 45 44 55 52 | 45 20 47 65 74 4d 6f 76 |PROCEDUR|E GetMov|
|00002f70| 69 65 53 65 6c 65 63 74 | 69 6f 6e 28 6d 3a 20 4d |ieSelect|ion(m: M|
|00002f80| 6f 76 69 65 3b 56 41 52 | 20 73 65 6c 65 63 74 69 |ovie;VAR| selecti|
|00002f90| 6f 6e 54 69 6d 65 3a 20 | 54 69 6d 65 56 61 6c 75 |onTime: |TimeValu|
|00002fa0| 65 3b 56 41 52 20 73 65 | 6c 65 63 74 69 6f 6e 44 |e;VAR se|lectionD|
|00002fb0| 75 72 61 74 69 6f 6e 3a | 20 54 69 6d 65 56 61 6c |uration:| TimeVal|
|00002fc0| 75 65 29 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |ue);. IN|LINE $30|
|00002fd0| 33 43 2c 24 33 37 2c 24 | 41 41 41 41 3b 0d 50 52 |3C,$37,$|AAAA;.PR|
|00002fe0| 4f 43 45 44 55 52 45 20 | 53 65 74 4d 6f 76 69 65 |OCEDURE |SetMovie|
|00002ff0| 53 65 6c 65 63 74 69 6f | 6e 28 6d 3a 20 4d 6f 76 |Selectio|n(m: Mov|
|00003000| 69 65 3b 73 65 6c 65 63 | 74 69 6f 6e 54 69 6d 65 |ie;selec|tionTime|
|00003010| 3a 20 54 69 6d 65 56 61 | 6c 75 65 3b 73 65 6c 65 |: TimeVa|lue;sele|
|00003020| 63 74 69 6f 6e 44 75 72 | 61 74 69 6f 6e 3a 20 54 |ctionDur|ation: T|
|00003030| 69 6d 65 56 61 6c 75 65 | 29 3b 0d 20 49 4e 4c 49 |imeValue|);. INLI|
|00003040| 4e 45 20 24 33 30 33 43 | 2c 24 33 38 2c 24 41 41 |NE $303C|,$38,$AA|
|00003050| 41 41 3b 0d 0d 50 52 4f | 43 45 44 55 52 45 20 53 |AA;..PRO|CEDURE S|
|00003060| 65 74 4d 6f 76 69 65 41 | 63 74 69 76 65 53 65 67 |etMovieA|ctiveSeg|
|00003070| 6d 65 6e 74 28 6d 3a 20 | 4d 6f 76 69 65 3b 73 74 |ment(m: |Movie;st|
|00003080| 61 72 74 54 69 6d 65 3a | 20 54 69 6d 65 56 61 6c |artTime:| TimeVal|
|00003090| 75 65 3b 64 75 72 61 74 | 69 6f 6e 3a 20 54 69 6d |ue;durat|ion: Tim|
|000030a0| 65 56 61 6c 75 65 29 3b | 0d 20 49 4e 4c 49 4e 45 |eValue);|. INLINE|
|000030b0| 20 24 33 30 33 43 2c 24 | 31 35 43 2c 24 41 41 41 | $303C,$|15C,$AAA|
|000030c0| 41 3b 0d 50 52 4f 43 45 | 44 55 52 45 20 47 65 74 |A;.PROCE|DURE Get|
|000030d0| 4d 6f 76 69 65 41 63 74 | 69 76 65 53 65 67 6d 65 |MovieAct|iveSegme|
|000030e0| 6e 74 28 6d 3a 20 4d 6f | 76 69 65 3b 56 41 52 20 |nt(m: Mo|vie;VAR |
|000030f0| 73 74 61 72 74 54 69 6d | 65 3a 20 54 69 6d 65 56 |startTim|e: TimeV|
|00003100| 61 6c 75 65 3b 56 41 52 | 20 64 75 72 61 74 69 6f |alue;VAR| duratio|
|00003110| 6e 3a 20 54 69 6d 65 56 | 61 6c 75 65 29 3b 0d 20 |n: TimeV|alue);. |
|00003120| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 31 35 |INLINE $|303C,$15|
|00003130| 44 2c 24 41 41 41 41 3b | 0d 0d 46 55 4e 43 54 49 |D,$AAAA;|..FUNCTI|
|00003140| 4f 4e 20 47 65 74 4d 6f | 76 69 65 54 69 6d 65 28 |ON GetMo|vieTime(|
|00003150| 6d 3a 20 4d 6f 76 69 65 | 3b 56 41 52 20 63 75 72 |m: Movie|;VAR cur|
|00003160| 72 65 6e 74 54 69 6d 65 | 3a 20 54 69 6d 65 52 65 |rentTime|: TimeRe|
|00003170| 63 6f 72 64 29 3a 20 54 | 69 6d 65 56 61 6c 75 65 |cord): T|imeValue|
|00003180| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00003190| 24 33 39 2c 24 41 41 41 | 41 3b 0d 50 52 4f 43 45 |$39,$AAA|A;.PROCE|
|000031a0| 44 55 52 45 20 53 65 74 | 4d 6f 76 69 65 54 69 6d |DURE Set|MovieTim|
|000031b0| 65 28 6d 3a 20 4d 6f 76 | 69 65 3b 6e 65 77 74 69 |e(m: Mov|ie;newti|
|000031c0| 6d 65 3a 20 54 69 6d 65 | 52 65 63 6f 72 64 29 3b |me: Time|Record);|
|000031d0| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|000031e0| 33 43 2c 24 41 41 41 41 | 3b 0d 50 52 4f 43 45 44 |3C,$AAAA|;.PROCED|
|000031f0| 55 52 45 20 53 65 74 4d | 6f 76 69 65 54 69 6d 65 |URE SetM|ovieTime|
|00003200| 56 61 6c 75 65 28 6d 3a | 20 4d 6f 76 69 65 3b 6e |Value(m:| Movie;n|
|00003210| 65 77 74 69 6d 65 3a 20 | 54 69 6d 65 56 61 6c 75 |ewtime: |TimeValu|
|00003220| 65 29 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |e);. INL|INE $303|
|00003230| 43 2c 24 33 44 2c 24 41 | 41 41 41 3b 0d 0d 46 55 |C,$3D,$A|AAA;..FU|
|00003240| 4e 43 54 49 4f 4e 20 47 | 65 74 4d 6f 76 69 65 55 |NCTION G|etMovieU|
|00003250| 73 65 72 44 61 74 61 28 | 6d 3a 20 4d 6f 76 69 65 |serData(|m: Movie|
|00003260| 29 3a 20 55 73 65 72 44 | 61 74 61 3b 0d 20 49 4e |): UserD|ata;. IN|
|00003270| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 33 45 2c 24 |LINE $30|3C,$3E,$|
|00003280| 41 41 41 41 3b 0d 0d 50 | 52 4f 43 45 44 55 52 45 |AAAA;..P|ROCEDURE|
|00003290| 20 53 65 74 4d 6f 76 69 | 65 50 6c 61 79 48 69 6e | SetMovi|ePlayHin|
|000032a0| 74 73 28 6d 6f 76 69 65 | 3a 4d 6f 76 69 65 3b 20 |ts(movie|:Movie; |
|000032b0| 66 6c 61 67 73 3a 4c 4f | 4e 47 49 4e 54 3b 20 66 |flags:LO|NGINT; f|
|000032c0| 6c 61 67 73 4d 61 73 6b | 3a 4c 4f 4e 47 49 4e 54 |lagsMask|:LONGINT|
|000032d0| 20 29 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 | );. INL|INE $303|
|000032e0| 43 2c 24 31 41 31 2c 24 | 41 41 41 41 3b 0d 0d 0d |C,$1A1,$|AAAA;...|
|000032f0| 7b 20 20 4d 6f 76 69 65 | 2f 54 72 61 63 6b 2f 4d |{  Movie|/Track/M|
|00003300| 65 64 69 61 20 66 69 6e | 64 69 6e 67 20 52 6f 75 |edia fin|ding Rou|
|00003310| 74 69 6e 65 73 20 20 7d | 0d 46 55 4e 43 54 49 4f |tines  }|.FUNCTIO|
|00003320| 4e 20 47 65 74 4d 6f 76 | 69 65 54 72 61 63 6b 43 |N GetMov|ieTrackC|
|00003330| 6f 75 6e 74 28 6d 3a 20 | 4d 6f 76 69 65 29 3a 20 |ount(m: |Movie): |
|00003340| 4c 4f 4e 47 49 4e 54 3b | 0d 20 49 4e 4c 49 4e 45 |LONGINT;|. INLINE|
|00003350| 20 24 33 30 33 43 2c 24 | 33 46 2c 24 41 41 41 41 | $303C,$|3F,$AAAA|
|00003360| 3b 0d 46 55 4e 43 54 49 | 4f 4e 20 47 65 74 4d 6f |;.FUNCTI|ON GetMo|
|00003370| 76 69 65 54 72 61 63 6b | 28 6d 3a 20 4d 6f 76 69 |vieTrack|(m: Movi|
|00003380| 65 3b 74 72 61 63 6b 49 | 44 3a 20 4c 4f 4e 47 49 |e;trackI|D: LONGI|
|00003390| 4e 54 29 3a 20 54 72 61 | 63 6b 3b 0d 20 49 4e 4c |NT): Tra|ck;. INL|
|000033a0| 49 4e 45 20 24 33 30 33 | 43 2c 24 34 30 2c 24 41 |INE $303|C,$40,$A|
|000033b0| 41 41 41 3b 0d 0d 46 55 | 4e 43 54 49 4f 4e 20 47 |AAA;..FU|NCTION G|
|000033c0| 65 74 4d 6f 76 69 65 49 | 6e 64 54 72 61 63 6b 28 |etMovieI|ndTrack(|
|000033d0| 6d 3a 20 4d 6f 76 69 65 | 3b 69 6e 64 65 78 3a 20 |m: Movie|;index: |
|000033e0| 4c 4f 4e 47 49 4e 54 29 | 3a 20 54 72 61 63 6b 3b |LONGINT)|: Track;|
|000033f0| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00003400| 31 31 37 2c 24 41 41 41 | 41 3b 0d 0d 46 55 4e 43 |117,$AAA|A;..FUNC|
|00003410| 54 49 4f 4e 20 47 65 74 | 54 72 61 63 6b 49 44 28 |TION Get|TrackID(|
|00003420| 74 3a 20 54 72 61 63 6b | 29 3a 20 4c 4f 4e 47 49 |t: Track|): LONGI|
|00003430| 4e 54 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |NT;. INL|INE $303|
|00003440| 43 2c 24 31 32 37 2c 24 | 41 41 41 41 3b 0d 0d 46 |C,$127,$|AAAA;..F|
|00003450| 55 4e 43 54 49 4f 4e 20 | 47 65 74 54 72 61 63 6b |UNCTION |GetTrack|
|00003460| 4d 6f 76 69 65 28 74 3a | 20 54 72 61 63 6b 29 3a |Movie(t:| Track):|
|00003470| 20 4d 6f 76 69 65 3b 0d | 20 49 4e 4c 49 4e 45 20 | Movie;.| INLINE |
|00003480| 24 33 30 33 43 2c 24 44 | 30 2c 24 41 41 41 41 3b |$303C,$D|0,$AAAA;|
|00003490| 0d 0d 46 55 4e 43 54 49 | 4f 4e 20 47 65 74 54 72 |..FUNCTI|ON GetTr|
|000034a0| 61 63 6b 4d 65 64 69 61 | 28 74 3a 20 54 72 61 63 |ackMedia|(t: Trac|
|000034b0| 6b 29 3a 20 4d 65 64 69 | 61 3b 0d 20 49 4e 4c 49 |k): Medi|a;. INLI|
|000034c0| 4e 45 20 24 33 30 33 43 | 2c 24 36 32 2c 24 41 41 |NE $303C|,$62,$AA|
|000034d0| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |AA;.FUNC|TION Get|
|000034e0| 4d 65 64 69 61 54 72 61 | 63 6b 28 6d 3a 20 4d 65 |MediaTra|ck(m: Me|
|000034f0| 64 69 61 29 3a 20 54 72 | 61 63 6b 3b 0d 20 49 4e |dia): Tr|ack;. IN|
|00003500| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 43 35 2c 24 |LINE $30|3C,$C5,$|
|00003510| 41 41 41 41 3b 0d 0d 0d | 7b 20 20 54 72 61 63 6b |AAAA;...|{  Track|
|00003520| 20 63 72 65 61 74 69 6f | 6e 20 52 6f 75 74 69 6e | creatio|n Routin|
|00003530| 65 73 20 20 7d 0d 46 55 | 4e 43 54 49 4f 4e 20 4e |es  }.FU|NCTION N|
|00003540| 65 77 4d 6f 76 69 65 54 | 72 61 63 6b 28 6d 3a 20 |ewMovieT|rack(m: |
|00003550| 4d 6f 76 69 65 3b 77 69 | 64 74 68 3a 20 46 69 78 |Movie;wi|dth: Fix|
|00003560| 65 64 3b 68 65 69 67 68 | 74 3a 20 46 69 78 65 64 |ed;heigh|t: Fixed|
|00003570| 3b 74 72 61 63 6b 56 6f | 6c 75 6d 65 3a 20 49 4e |;trackVo|lume: IN|
|00003580| 54 45 47 45 52 29 3a 20 | 54 72 61 63 6b 3b 0d 20 |TEGER): |Track;. |
|00003590| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 31 38 |INLINE $|303C,$18|
|000035a0| 38 2c 24 41 41 41 41 3b | 0d 50 52 4f 43 45 44 55 |8,$AAAA;|.PROCEDU|
|000035b0| 52 45 20 44 69 73 70 6f | 73 65 4d 6f 76 69 65 54 |RE Dispo|seMovieT|
|000035c0| 72 61 63 6b 28 74 3a 20 | 54 72 61 63 6b 29 3b 0d |rack(t: |Track);.|
|000035d0| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 34 | INLINE |$303C,$4|
|000035e0| 32 2c 24 41 41 41 41 3b | 0d 0d 0d 7b 20 20 54 72 |2,$AAAA;|...{  Tr|
|000035f0| 61 63 6b 20 52 6f 75 74 | 69 6e 65 73 20 20 7d 0d |ack Rout|ines  }.|
|00003600| 46 55 4e 43 54 49 4f 4e | 20 47 65 74 54 72 61 63 |FUNCTION| GetTrac|
|00003610| 6b 43 72 65 61 74 69 6f | 6e 54 69 6d 65 28 74 3a |kCreatio|nTime(t:|
|00003620| 20 54 72 61 63 6b 29 3a | 20 4c 4f 4e 47 49 4e 54 | Track):| LONGINT|
|00003630| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00003640| 24 34 33 2c 24 41 41 41 | 41 3b 0d 46 55 4e 43 54 |$43,$AAA|A;.FUNCT|
|00003650| 49 4f 4e 20 47 65 74 54 | 72 61 63 6b 4d 6f 64 69 |ION GetT|rackModi|
|00003660| 66 69 63 61 74 69 6f 6e | 54 69 6d 65 28 74 3a 20 |fication|Time(t: |
|00003670| 54 72 61 63 6b 29 3a 20 | 4c 4f 4e 47 49 4e 54 3b |Track): |LONGINT;|
|00003680| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00003690| 34 34 2c 24 41 41 41 41 | 3b 0d 0d 46 55 4e 43 54 |44,$AAAA|;..FUNCT|
|000036a0| 49 4f 4e 20 47 65 74 54 | 72 61 63 6b 45 6e 61 62 |ION GetT|rackEnab|
|000036b0| 6c 65 64 28 74 3a 20 54 | 72 61 63 6b 29 3a 20 42 |led(t: T|rack): B|
|000036c0| 4f 4f 4c 45 41 4e 3b 0d | 20 49 4e 4c 49 4e 45 20 |OOLEAN;.| INLINE |
|000036d0| 24 33 30 33 43 2c 24 34 | 35 2c 24 41 41 41 41 3b |$303C,$4|5,$AAAA;|
|000036e0| 0d 50 52 4f 43 45 44 55 | 52 45 20 53 65 74 54 72 |.PROCEDU|RE SetTr|
|000036f0| 61 63 6b 45 6e 61 62 6c | 65 64 28 74 3a 20 54 72 |ackEnabl|ed(t: Tr|
|00003700| 61 63 6b 3b 69 73 45 6e | 61 62 6c 65 64 3a 20 42 |ack;isEn|abled: B|
|00003710| 4f 4f 4c 45 41 4e 29 3b | 0d 20 49 4e 4c 49 4e 45 |OOLEAN);|. INLINE|
|00003720| 20 24 33 30 33 43 2c 24 | 34 36 2c 24 41 41 41 41 | $303C,$|46,$AAAA|
|00003730| 3b 0d 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 54 |;..FUNCT|ION GetT|
|00003740| 72 61 63 6b 55 73 61 67 | 65 28 74 3a 20 54 72 61 |rackUsag|e(t: Tra|
|00003750| 63 6b 29 3a 20 4c 4f 4e | 47 49 4e 54 3b 0d 20 49 |ck): LON|GINT;. I|
|00003760| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 34 37 2c |NLINE $3|03C,$47,|
|00003770| 24 41 41 41 41 3b 0d 50 | 52 4f 43 45 44 55 52 45 |$AAAA;.P|ROCEDURE|
|00003780| 20 53 65 74 54 72 61 63 | 6b 55 73 61 67 65 28 74 | SetTrac|kUsage(t|
|00003790| 3a 20 54 72 61 63 6b 3b | 75 73 61 67 65 3a 20 4c |: Track;|usage: L|
|000037a0| 4f 4e 47 49 4e 54 29 3b | 0d 20 49 4e 4c 49 4e 45 |ONGINT);|. INLINE|
|000037b0| 20 24 33 30 33 43 2c 24 | 34 38 2c 24 41 41 41 41 | $303C,$|48,$AAAA|
|000037c0| 3b 0d 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 54 |;..FUNCT|ION GetT|
|000037d0| 72 61 63 6b 44 75 72 61 | 74 69 6f 6e 28 74 3a 20 |rackDura|tion(t: |
|000037e0| 54 72 61 63 6b 29 3a 20 | 54 69 6d 65 56 61 6c 75 |Track): |TimeValu|
|000037f0| 65 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |e;. INLI|NE $303C|
|00003800| 2c 24 34 42 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$4B,$AA|AA;..FUN|
|00003810| 43 54 49 4f 4e 20 47 65 | 74 54 72 61 63 6b 4f 66 |CTION Ge|tTrackOf|
|00003820| 66 73 65 74 28 74 3a 20 | 54 72 61 63 6b 29 3a 20 |fset(t: |Track): |
|00003830| 54 69 6d 65 56 61 6c 75 | 65 3b 0d 20 49 4e 4c 49 |TimeValu|e;. INLI|
|00003840| 4e 45 20 24 33 30 33 43 | 2c 24 34 43 2c 24 41 41 |NE $303C|,$4C,$AA|
|00003850| 41 41 3b 0d 50 52 4f 43 | 45 44 55 52 45 20 53 65 |AA;.PROC|EDURE Se|
|00003860| 74 54 72 61 63 6b 4f 66 | 66 73 65 74 28 74 3a 20 |tTrackOf|fset(t: |
|00003870| 54 72 61 63 6b 3b 6f 66 | 66 73 65 74 3a 20 54 69 |Track;of|fset: Ti|
|00003880| 6d 65 56 61 6c 75 65 29 | 3b 0d 20 49 4e 4c 49 4e |meValue)|;. INLIN|
|00003890| 45 20 24 33 30 33 43 2c | 24 34 44 2c 24 41 41 41 |E $303C,|$4D,$AAA|
|000038a0| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |A;..FUNC|TION Get|
|000038b0| 54 72 61 63 6b 4c 61 79 | 65 72 28 74 3a 20 54 72 |TrackLay|er(t: Tr|
|000038c0| 61 63 6b 29 3a 20 49 4e | 54 45 47 45 52 3b 0d 20 |ack): IN|TEGER;. |
|000038d0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 35 30 |INLINE $|303C,$50|
|000038e0| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|000038f0| 45 20 53 65 74 54 72 61 | 63 6b 4c 61 79 65 72 28 |E SetTra|ckLayer(|
|00003900| 74 3a 20 54 72 61 63 6b | 3b 6c 61 79 65 72 3a 20 |t: Track|;layer: |
|00003910| 49 4e 54 45 47 45 52 29 | 3b 0d 20 49 4e 4c 49 4e |INTEGER)|;. INLIN|
|00003920| 45 20 24 33 30 33 43 2c | 24 35 31 2c 24 41 41 41 |E $303C,|$51,$AAA|
|00003930| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |A;..FUNC|TION Get|
|00003940| 54 72 61 63 6b 41 6c 74 | 65 72 6e 61 74 65 28 74 |TrackAlt|ernate(t|
|00003950| 3a 20 54 72 61 63 6b 29 | 3a 20 54 72 61 63 6b 3b |: Track)|: Track;|
|00003960| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00003970| 35 32 2c 24 41 41 41 41 | 3b 0d 50 52 4f 43 45 44 |52,$AAAA|;.PROCED|
|00003980| 55 52 45 20 53 65 74 54 | 72 61 63 6b 41 6c 74 65 |URE SetT|rackAlte|
|00003990| 72 6e 61 74 65 28 74 3a | 20 54 72 61 63 6b 3b 61 |rnate(t:| Track;a|
|000039a0| 6c 74 65 72 6e 61 74 65 | 54 3a 20 54 72 61 63 6b |lternate|T: Track|
|000039b0| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|000039c0| 2c 24 35 33 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$53,$AA|AA;..FUN|
|000039d0| 43 54 49 4f 4e 20 47 65 | 74 54 72 61 63 6b 56 6f |CTION Ge|tTrackVo|
|000039e0| 6c 75 6d 65 28 74 3a 20 | 54 72 61 63 6b 29 3a 20 |lume(t: |Track): |
|000039f0| 49 4e 54 45 47 45 52 3b | 0d 20 49 4e 4c 49 4e 45 |INTEGER;|. INLINE|
|00003a00| 20 24 33 30 33 43 2c 24 | 35 34 2c 24 41 41 41 41 | $303C,$|54,$AAAA|
|00003a10| 3b 0d 50 52 4f 43 45 44 | 55 52 45 20 53 65 74 54 |;.PROCED|URE SetT|
|00003a20| 72 61 63 6b 56 6f 6c 75 | 6d 65 28 74 3a 20 54 72 |rackVolu|me(t: Tr|
|00003a30| 61 63 6b 3b 76 6f 6c 75 | 6d 65 3a 20 49 4e 54 45 |ack;volu|me: INTE|
|00003a40| 47 45 52 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |GER);. I|NLINE $3|
|00003a50| 30 33 43 2c 24 35 35 2c | 24 41 41 41 41 3b 0d 0d |03C,$55,|$AAAA;..|
|00003a60| 50 52 4f 43 45 44 55 52 | 45 20 47 65 74 54 72 61 |PROCEDUR|E GetTra|
|00003a70| 63 6b 4d 61 74 72 69 78 | 28 74 3a 20 54 72 61 63 |ckMatrix|(t: Trac|
|00003a80| 6b 3b 56 41 52 20 6d 61 | 74 72 69 78 3a 20 4d 61 |k;VAR ma|trix: Ma|
|00003a90| 74 72 69 78 52 65 63 6f | 72 64 29 3b 0d 20 49 4e |trixReco|rd);. IN|
|00003aa0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 35 36 2c 24 |LINE $30|3C,$56,$|
|00003ab0| 41 41 41 41 3b 0d 50 52 | 4f 43 45 44 55 52 45 20 |AAAA;.PR|OCEDURE |
|00003ac0| 53 65 74 54 72 61 63 6b | 4d 61 74 72 69 78 28 74 |SetTrack|Matrix(t|
|00003ad0| 3a 20 54 72 61 63 6b 3b | 6d 61 74 72 69 78 3a 20 |: Track;|matrix: |
|00003ae0| 4d 61 74 72 69 78 52 65 | 63 6f 72 64 29 3b 0d 20 |MatrixRe|cord);. |
|00003af0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 35 37 |INLINE $|303C,$57|
|00003b00| 2c 24 41 41 41 41 3b 0d | 0d 50 52 4f 43 45 44 55 |,$AAAA;.|.PROCEDU|
|00003b10| 52 45 20 47 65 74 54 72 | 61 63 6b 44 69 6d 65 6e |RE GetTr|ackDimen|
|00003b20| 73 69 6f 6e 73 28 74 3a | 20 54 72 61 63 6b 3b 56 |sions(t:| Track;V|
|00003b30| 41 52 20 77 69 64 74 68 | 3a 20 46 69 78 65 64 3b |AR width|: Fixed;|
|00003b40| 56 41 52 20 68 65 69 67 | 68 74 3a 20 46 69 78 65 |VAR heig|ht: Fixe|
|00003b50| 64 29 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |d);. INL|INE $303|
|00003b60| 43 2c 24 35 44 2c 24 41 | 41 41 41 3b 0d 50 52 4f |C,$5D,$A|AAA;.PRO|
|00003b70| 43 45 44 55 52 45 20 53 | 65 74 54 72 61 63 6b 44 |CEDURE S|etTrackD|
|00003b80| 69 6d 65 6e 73 69 6f 6e | 73 28 74 3a 20 54 72 61 |imension|s(t: Tra|
|00003b90| 63 6b 3b 77 69 64 74 68 | 3a 20 46 69 78 65 64 3b |ck;width|: Fixed;|
|00003ba0| 68 65 69 67 68 74 3a 20 | 46 69 78 65 64 29 3b 0d |height: |Fixed);.|
|00003bb0| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 35 | INLINE |$303C,$5|
|00003bc0| 45 2c 24 41 41 41 41 3b | 0d 0d 46 55 4e 43 54 49 |E,$AAAA;|..FUNCTI|
|00003bd0| 4f 4e 20 47 65 74 54 72 | 61 63 6b 55 73 65 72 44 |ON GetTr|ackUserD|
|00003be0| 61 74 61 28 74 3a 20 54 | 72 61 63 6b 29 3a 20 55 |ata(t: T|rack): U|
|00003bf0| 73 65 72 44 61 74 61 3b | 0d 20 49 4e 4c 49 4e 45 |serData;|. INLINE|
|00003c00| 20 24 33 30 33 43 2c 24 | 35 46 2c 24 41 41 41 41 | $303C,$|5F,$AAAA|
|00003c10| 3b 0d 0d 0d 7b 20 20 4d | 65 64 69 61 20 63 72 65 |;...{  M|edia cre|
|00003c20| 61 74 69 6f 6e 20 52 6f | 75 74 69 6e 65 73 20 20 |ation Ro|utines  |
|00003c30| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 4e 65 77 54 72 |}.FUNCTI|ON NewTr|
|00003c40| 61 63 6b 4d 65 64 69 61 | 28 74 3a 20 54 72 61 63 |ackMedia|(t: Trac|
|00003c50| 6b 3b 6d 65 64 69 61 54 | 79 70 65 3a 20 4f 53 54 |k;mediaT|ype: OST|
|00003c60| 79 70 65 3b 74 69 6d 65 | 53 63 61 6c 65 3a 20 54 |ype;time|Scale: T|
|00003c70| 69 6d 65 53 63 61 6c 65 | 3b 0d 20 64 61 74 61 52 |imeScale|;. dataR|
|00003c80| 65 66 3a 20 48 61 6e 64 | 6c 65 3b 64 61 74 61 52 |ef: Hand|le;dataR|
|00003c90| 65 66 54 79 70 65 3a 20 | 4f 53 54 79 70 65 29 3a |efType: |OSType):|
|00003ca0| 20 4d 65 64 69 61 3b 0d | 20 49 4e 4c 49 4e 45 20 | Media;.| INLINE |
|00003cb0| 24 33 30 33 43 2c 24 31 | 38 45 2c 24 41 41 41 41 |$303C,$1|8E,$AAAA|
|00003cc0| 3b 0d 50 52 4f 43 45 44 | 55 52 45 20 44 69 73 70 |;.PROCED|URE Disp|
|00003cd0| 6f 73 65 54 72 61 63 6b | 4d 65 64 69 61 28 6d 3a |oseTrack|Media(m:|
|00003ce0| 20 4d 65 64 69 61 29 3b | 0d 20 49 4e 4c 49 4e 45 | Media);|. INLINE|
|00003cf0| 20 24 33 30 33 43 2c 24 | 36 31 2c 24 41 41 41 41 | $303C,$|61,$AAAA|
|00003d00| 3b 0d 0d 0d 7b 20 20 4d | 65 64 69 61 20 52 6f 75 |;...{  M|edia Rou|
|00003d10| 74 69 6e 65 73 20 20 7d | 0d 46 55 4e 43 54 49 4f |tines  }|.FUNCTIO|
|00003d20| 4e 20 47 65 74 4d 65 64 | 69 61 43 72 65 61 74 69 |N GetMed|iaCreati|
|00003d30| 6f 6e 54 69 6d 65 28 6d | 3a 20 4d 65 64 69 61 29 |onTime(m|: Media)|
|00003d40| 3a 20 4c 4f 4e 47 49 4e | 54 3b 0d 20 49 4e 4c 49 |: LONGIN|T;. INLI|
|00003d50| 4e 45 20 24 33 30 33 43 | 2c 24 36 36 2c 24 41 41 |NE $303C|,$66,$AA|
|00003d60| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |AA;.FUNC|TION Get|
|00003d70| 4d 65 64 69 61 4d 6f 64 | 69 66 69 63 61 74 69 6f |MediaMod|ificatio|
|00003d80| 6e 54 69 6d 65 28 6d 3a | 20 4d 65 64 69 61 29 3a |nTime(m:| Media):|
|00003d90| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 20 49 4e 4c 49 4e | LONGINT|;. INLIN|
|00003da0| 45 20 24 33 30 33 43 2c | 24 36 37 2c 24 41 41 41 |E $303C,|$67,$AAA|
|00003db0| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |A;..FUNC|TION Get|
|00003dc0| 4d 65 64 69 61 54 69 6d | 65 53 63 61 6c 65 28 6d |MediaTim|eScale(m|
|00003dd0| 3a 20 4d 65 64 69 61 29 | 3a 20 54 69 6d 65 53 63 |: Media)|: TimeSc|
|00003de0| 61 6c 65 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |ale;. IN|LINE $30|
|00003df0| 33 43 2c 24 36 38 2c 24 | 41 41 41 41 3b 0d 50 52 |3C,$68,$|AAAA;.PR|
|00003e00| 4f 43 45 44 55 52 45 20 | 53 65 74 4d 65 64 69 61 |OCEDURE |SetMedia|
|00003e10| 54 69 6d 65 53 63 61 6c | 65 28 6d 3a 20 4d 65 64 |TimeScal|e(m: Med|
|00003e20| 69 61 3b 74 69 6d 65 53 | 63 61 6c 65 3a 20 54 69 |ia;timeS|cale: Ti|
|00003e30| 6d 65 53 63 61 6c 65 29 | 3b 0d 20 49 4e 4c 49 4e |meScale)|;. INLIN|
|00003e40| 45 20 24 33 30 33 43 2c | 24 36 39 2c 24 41 41 41 |E $303C,|$69,$AAA|
|00003e50| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |A;..FUNC|TION Get|
|00003e60| 4d 65 64 69 61 44 75 72 | 61 74 69 6f 6e 28 6d 3a |MediaDur|ation(m:|
|00003e70| 20 4d 65 64 69 61 29 3a | 20 54 69 6d 65 56 61 6c | Media):| TimeVal|
|00003e80| 75 65 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |ue;. INL|INE $303|
|00003e90| 43 2c 24 36 41 2c 24 41 | 41 41 41 3b 0d 0d 46 55 |C,$6A,$A|AAA;..FU|
|00003ea0| 4e 43 54 49 4f 4e 20 47 | 65 74 4d 65 64 69 61 4c |NCTION G|etMediaL|
|00003eb0| 61 6e 67 75 61 67 65 28 | 6d 3a 20 4d 65 64 69 61 |anguage(|m: Media|
|00003ec0| 29 3a 20 49 4e 54 45 47 | 45 52 3b 0d 20 49 4e 4c |): INTEG|ER;. INL|
|00003ed0| 49 4e 45 20 24 33 30 33 | 43 2c 24 36 42 2c 24 41 |INE $303|C,$6B,$A|
|00003ee0| 41 41 41 3b 0d 50 52 4f | 43 45 44 55 52 45 20 53 |AAA;.PRO|CEDURE S|
|00003ef0| 65 74 4d 65 64 69 61 4c | 61 6e 67 75 61 67 65 28 |etMediaL|anguage(|
|00003f00| 6d 3a 20 4d 65 64 69 61 | 3b 6c 61 6e 67 75 61 67 |m: Media|;languag|
|00003f10| 65 3a 20 49 4e 54 45 47 | 45 52 29 3b 0d 20 49 4e |e: INTEG|ER);. IN|
|00003f20| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 36 43 2c 24 |LINE $30|3C,$6C,$|
|00003f30| 41 41 41 41 3b 0d 0d 46 | 55 4e 43 54 49 4f 4e 20 |AAAA;..F|UNCTION |
|00003f40| 47 65 74 4d 65 64 69 61 | 51 75 61 6c 69 74 79 28 |GetMedia|Quality(|
|00003f50| 6d 3a 20 4d 65 64 69 61 | 29 3a 20 49 4e 54 45 47 |m: Media|): INTEG|
|00003f60| 45 52 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |ER;. INL|INE $303|
|00003f70| 43 2c 24 36 44 2c 24 41 | 41 41 41 3b 0d 50 52 4f |C,$6D,$A|AAA;.PRO|
|00003f80| 43 45 44 55 52 45 20 53 | 65 74 4d 65 64 69 61 51 |CEDURE S|etMediaQ|
|00003f90| 75 61 6c 69 74 79 28 6d | 3a 20 4d 65 64 69 61 3b |uality(m|: Media;|
|00003fa0| 71 75 61 6c 69 74 79 3a | 20 49 4e 54 45 47 45 52 |quality:| INTEGER|
|00003fb0| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00003fc0| 2c 24 36 45 2c 24 41 41 | 41 41 3b 0d 0d 46 55 4e |,$6E,$AA|AA;..FUN|
|00003fd0| 43 54 49 4f 4e 20 47 65 | 74 4d 65 64 69 61 55 73 |CTION Ge|tMediaUs|
|00003fe0| 65 72 44 61 74 61 28 6d | 3a 20 4d 65 64 69 61 29 |erData(m|: Media)|
|00003ff0| 3a 20 55 73 65 72 44 61 | 74 61 3b 0d 20 49 4e 4c |: UserDa|ta;. INL|
|00004000| 49 4e 45 20 24 33 30 33 | 43 2c 24 37 30 2c 24 41 |INE $303|C,$70,$A|
|00004010| 41 41 41 3b 0d 0d 0d 50 | 52 4f 43 45 44 55 52 45 |AAA;...P|ROCEDURE|
|00004020| 20 53 65 74 4d 65 64 69 | 61 50 6c 61 79 48 69 6e | SetMedi|aPlayHin|
|00004030| 74 73 28 20 6d 6f 76 69 | 65 3a 4d 6f 76 69 65 3b |ts( movi|e:Movie;|
|00004040| 20 66 6c 61 67 73 3a 4c | 4f 4e 47 49 4e 54 3b 20 | flags:L|ONGINT; |
|00004050| 66 6c 61 67 73 4d 61 73 | 6b 3a 4c 4f 4e 47 49 4e |flagsMas|k:LONGIN|
|00004060| 54 20 29 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |T );. IN|LINE $30|
|00004070| 33 43 2c 24 31 41 32 2c | 24 41 41 41 41 3b 0d 0d |3C,$1A2,|$AAAA;..|
|00004080| 7b 20 20 4d 65 64 69 61 | 20 48 61 6e 64 6c 65 72 |{  Media| Handler|
|00004090| 20 52 6f 75 74 69 6e 65 | 73 20 20 7d 0d 46 55 4e | Routine|s  }.FUN|
|000040a0| 43 54 49 4f 4e 20 47 65 | 74 4d 65 64 69 61 48 61 |CTION Ge|tMediaHa|
|000040b0| 6e 64 6c 65 72 28 6d 3a | 20 4d 65 64 69 61 29 3a |ndler(m:| Media):|
|000040c0| 20 4d 65 64 69 61 48 61 | 6e 64 6c 65 72 3b 0d 20 | MediaHa|ndler;. |
|000040d0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 37 31 |INLINE $|303C,$71|
|000040e0| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|000040f0| 20 53 65 74 4d 65 64 69 | 61 48 61 6e 64 6c 65 72 | SetMedi|aHandler|
|00004100| 28 6d 3a 20 4d 65 64 69 | 61 3b 6d 48 3a 20 4d 65 |(m: Medi|a;mH: Me|
|00004110| 64 69 61 48 61 6e 64 6c | 65 72 43 6f 6d 70 6f 6e |diaHandl|erCompon|
|00004120| 65 6e 74 29 3a 20 4f 53 | 45 72 72 3b 0d 20 49 4e |ent): OS|Err;. IN|
|00004130| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 31 39 30 2c |LINE $30|3C,$190,|
|00004140| 24 41 41 41 41 3b 0d 0d | 50 52 4f 43 45 44 55 52 |$AAAA;..|PROCEDUR|
|00004150| 45 20 47 65 74 4d 65 64 | 69 61 48 61 6e 64 6c 65 |E GetMed|iaHandle|
|00004160| 72 44 65 73 63 72 69 70 | 74 69 6f 6e 28 6d 3a 20 |rDescrip|tion(m: |
|00004170| 4d 65 64 69 61 3b 56 41 | 52 20 6d 65 64 69 61 54 |Media;VA|R mediaT|
|00004180| 79 70 65 3a 20 4f 53 54 | 79 70 65 3b 56 41 52 20 |ype: OST|ype;VAR |
|00004190| 63 72 65 61 74 6f 72 4e | 61 6d 65 3a 20 53 74 72 |creatorN|ame: Str|
|000041a0| 32 35 35 3b 0d 20 56 41 | 52 20 63 72 65 61 74 6f |255;. VA|R creato|
|000041b0| 72 4d 61 6e 75 66 61 63 | 74 75 72 65 72 3a 20 4f |rManufac|turer: O|
|000041c0| 53 54 79 70 65 29 3b 0d | 20 49 4e 4c 49 4e 45 20 |SType);.| INLINE |
|000041d0| 24 33 30 33 43 2c 24 36 | 46 2c 24 41 41 41 41 3b |$303C,$6|F,$AAAA;|
|000041e0| 0d 0d 0d 43 4f 4e 53 54 | 0d 64 61 74 61 52 65 66 |...CONST|.dataRef|
|000041f0| 53 65 6c 66 52 65 66 65 | 72 65 6e 63 65 20 3d 20 |SelfRefe|rence = |
|00004200| 31 3b 0d 64 61 74 61 52 | 65 66 57 61 73 4e 6f 74 |1;.dataR|efWasNot|
|00004210| 52 65 73 6f 6c 76 65 64 | 20 3d 20 32 3b 0d 0d 0d |Resolved| = 2;...|
|00004220| 7b 20 20 4d 65 64 69 61 | 20 64 61 74 61 52 65 66 |{  Media| dataRef|
|00004230| 20 52 6f 75 74 69 6e 65 | 73 20 20 7d 0d 46 55 4e | Routine|s  }.FUN|
|00004240| 43 54 49 4f 4e 20 47 65 | 74 4d 65 64 69 61 44 61 |CTION Ge|tMediaDa|
|00004250| 74 61 52 65 66 28 6d 3a | 20 4d 65 64 69 61 3b 69 |taRef(m:| Media;i|
|00004260| 6e 64 65 78 3a 20 49 4e | 54 45 47 45 52 3b 56 41 |ndex: IN|TEGER;VA|
|00004270| 52 20 64 61 74 61 52 65 | 66 3a 20 48 61 6e 64 6c |R dataRe|f: Handl|
|00004280| 65 3b 56 41 52 20 64 61 | 74 61 52 65 66 54 79 70 |e;VAR da|taRefTyp|
|00004290| 65 3a 20 4f 53 54 79 70 | 65 3b 0d 20 56 41 52 20 |e: OSTyp|e;. VAR |
|000042a0| 64 61 74 61 52 65 66 41 | 74 74 72 69 62 75 74 65 |dataRefA|ttribute|
|000042b0| 73 3a 20 4c 4f 4e 47 49 | 4e 54 29 3a 20 4f 53 45 |s: LONGI|NT): OSE|
|000042c0| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|000042d0| 43 2c 24 31 39 37 2c 24 | 41 41 41 41 3b 0d 46 55 |C,$197,$|AAAA;.FU|
|000042e0| 4e 43 54 49 4f 4e 20 41 | 64 64 4d 65 64 69 61 44 |NCTION A|ddMediaD|
|000042f0| 61 74 61 52 65 66 28 6d | 3a 20 4d 65 64 69 61 3b |ataRef(m|: Media;|
|00004300| 56 41 52 20 69 6e 64 65 | 78 3a 20 49 4e 54 45 47 |VAR inde|x: INTEG|
|00004310| 45 52 3b 64 61 74 61 52 | 65 66 3a 20 48 61 6e 64 |ER;dataR|ef: Hand|
|00004320| 6c 65 3b 64 61 74 61 52 | 65 66 54 79 70 65 3a 20 |le;dataR|efType: |
|00004330| 4f 53 54 79 70 65 29 3a | 20 4f 53 45 72 72 3b 0d |OSType):| OSErr;.|
|00004340| 20 49 4e 4c 49 4e 45 20 | 24 33 30 33 43 2c 24 31 | INLINE |$303C,$1|
|00004350| 39 38 2c 24 41 41 41 41 | 3b 0d 46 55 4e 43 54 49 |98,$AAAA|;.FUNCTI|
|00004360| 4f 4e 20 53 65 74 4d 65 | 64 69 61 44 61 74 61 52 |ON SetMe|diaDataR|
|00004370| 65 66 28 6d 3a 20 4d 65 | 64 69 61 3b 69 6e 64 65 |ef(m: Me|dia;inde|
|00004380| 78 3a 20 49 4e 54 45 47 | 45 52 3b 62 6c 6f 62 3a |x: INTEG|ER;blob:|
|00004390| 20 48 61 6e 64 6c 65 3b | 20 62 6c 6f 62 54 79 70 | Handle;| blobTyp|
|000043a0| 65 3a 20 4f 53 54 79 70 | 65 29 3a 20 4f 53 54 79 |e: OSTyp|e): OSTy|
|000043b0| 70 65 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |pe;. INL|INE $303|
|000043c0| 43 2c 24 31 43 39 2c 24 | 41 41 41 41 3b 0d 46 55 |C,$1C9,$|AAAA;.FU|
|000043d0| 4e 43 54 49 4f 4e 20 53 | 65 74 4d 65 64 69 61 44 |NCTION S|etMediaD|
|000043e0| 61 74 61 52 65 66 41 74 | 74 72 69 62 75 74 65 73 |ataRefAt|tributes|
|000043f0| 28 6d 3a 20 4d 65 64 69 | 61 3b 69 6e 64 65 78 3a |(m: Medi|a;index:|
|00004400| 20 49 4e 54 45 47 45 52 | 3b 61 74 74 72 69 62 75 | INTEGER|;attribu|
|00004410| 74 65 73 3a 20 4c 4f 4e | 47 49 4e 54 29 3a 20 4f |tes: LON|GINT): O|
|00004420| 53 54 79 70 65 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |SType;. |INLINE $|
|00004430| 33 30 33 43 2c 24 31 43 | 41 2c 24 41 41 41 41 3b |303C,$1C|A,$AAAA;|
|00004440| 0d 46 55 4e 43 54 49 4f | 4e 20 47 65 74 4d 65 64 |.FUNCTIO|N GetMed|
|00004450| 69 61 44 61 74 61 52 65 | 66 43 6f 75 6e 74 28 6d |iaDataRe|fCount(m|
|00004460| 3a 20 4d 65 64 69 61 3b | 56 41 52 20 63 6f 75 6e |: Media;|VAR coun|
|00004470| 74 3a 20 49 4e 54 45 47 | 45 52 29 3a 20 4f 53 45 |t: INTEG|ER): OSE|
|00004480| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|00004490| 43 2c 24 31 39 39 2c 24 | 41 41 41 41 3b 0d 0d 0d |C,$199,$|AAAA;...|
|000044a0| 7b 20 20 4d 65 64 69 61 | 20 64 61 74 61 20 68 61 |{  Media| data ha|
|000044b0| 6e 64 6c 65 72 20 52 6f | 75 74 69 6e 65 73 20 20 |ndler Ro|utines  |
|000044c0| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 47 65 74 4d 65 |}.FUNCTI|ON GetMe|
|000044d0| 64 69 61 44 61 74 61 48 | 61 6e 64 6c 65 72 28 6d |diaDataH|andler(m|
|000044e0| 3a 20 4d 65 64 69 61 3b | 69 6e 64 65 78 3a 20 49 |: Media;|index: I|
|000044f0| 4e 54 45 47 45 52 29 3a | 20 44 61 74 61 48 61 6e |NTEGER):| DataHan|
|00004500| 64 6c 65 72 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |dler;. I|NLINE $3|
|00004510| 30 33 43 2c 24 31 39 46 | 2c 24 41 41 41 41 3b 0d |03C,$19F|,$AAAA;.|
|00004520| 46 55 4e 43 54 49 4f 4e | 20 53 65 74 4d 65 64 69 |FUNCTION| SetMedi|
|00004530| 61 44 61 74 61 48 61 6e | 64 6c 65 72 28 6d 3a 20 |aDataHan|dler(m: |
|00004540| 4d 65 64 69 61 3b 69 6e | 64 65 78 3a 20 49 4e 54 |Media;in|dex: INT|
|00004550| 45 47 45 52 3b 20 64 61 | 74 61 48 61 6e 64 6c 65 |EGER; da|taHandle|
|00004560| 72 3a 20 44 61 74 61 48 | 61 6e 64 6c 65 72 43 6f |r: DataH|andlerCo|
|00004570| 6d 70 6f 6e 65 6e 74 29 | 3a 20 4f 53 45 72 72 3b |mponent)|: OSErr;|
|00004580| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00004590| 31 41 30 2c 24 41 41 41 | 41 3b 0d 0d 50 52 4f 43 |1A0,$AAA|A;..PROC|
|000045a0| 45 44 55 52 45 20 47 65 | 74 4d 65 64 69 61 44 61 |EDURE Ge|tMediaDa|
|000045b0| 74 61 48 61 6e 64 6c 65 | 72 44 65 73 63 72 69 70 |taHandle|rDescrip|
|000045c0| 74 69 6f 6e 28 6d 3a 20 | 4d 65 64 69 61 3b 69 6e |tion(m: |Media;in|
|000045d0| 64 65 78 3a 20 49 4e 54 | 45 47 45 52 3b 56 41 52 |dex: INT|EGER;VAR|
|000045e0| 20 64 68 54 79 70 65 3a | 20 4f 53 54 79 70 65 3b | dhType:| OSType;|
|000045f0| 0d 09 56 41 52 20 63 72 | 65 61 74 6f 72 4e 61 6d |..VAR cr|eatorNam|
|00004600| 65 3a 20 53 74 72 32 35 | 35 3b 56 41 52 20 63 72 |e: Str25|5;VAR cr|
|00004610| 65 61 74 6f 72 4d 61 6e | 75 66 61 63 74 75 72 65 |eatorMan|ufacture|
|00004620| 72 3a 20 4f 53 54 79 70 | 65 29 3b 0d 09 49 4e 4c |r: OSTyp|e);..INL|
|00004630| 49 4e 45 20 24 33 30 33 | 43 2c 24 31 39 45 2c 24 |INE $303|C,$19E,$|
|00004640| 41 41 41 41 3b 0d 0d 7b | 20 20 4d 65 64 69 61 20 |AAAA;..{|  Media |
|00004650| 73 61 6d 70 6c 65 20 52 | 6f 75 74 69 6e 65 73 20 |sample R|outines |
|00004660| 20 7d 0d 46 55 4e 43 54 | 49 4f 4e 20 47 65 74 4d | }.FUNCT|ION GetM|
|00004670| 65 64 69 61 53 61 6d 70 | 6c 65 44 65 73 63 72 69 |ediaSamp|leDescri|
|00004680| 70 74 69 6f 6e 43 6f 75 | 6e 74 28 6d 3a 20 4d 65 |ptionCou|nt(m: Me|
|00004690| 64 69 61 29 3a 20 4c 4f | 4e 47 49 4e 54 3b 0d 20 |dia): LO|NGINT;. |
|000046a0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 37 37 |INLINE $|303C,$77|
|000046b0| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|000046c0| 45 20 47 65 74 4d 65 64 | 69 61 53 61 6d 70 6c 65 |E GetMed|iaSample|
|000046d0| 44 65 73 63 72 69 70 74 | 69 6f 6e 28 6d 3a 20 4d |Descript|ion(m: M|
|000046e0| 65 64 69 61 3b 69 6e 64 | 65 78 3a 20 4c 4f 4e 47 |edia;ind|ex: LONG|
|000046f0| 49 4e 54 3b 64 65 73 63 | 48 3a 20 53 61 6d 70 6c |INT;desc|H: Sampl|
|00004700| 65 44 65 73 63 72 69 70 | 74 69 6f 6e 48 61 6e 64 |eDescrip|tionHand|
|00004710| 6c 65 29 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |le);. IN|LINE $30|
|00004720| 33 43 2c 24 37 38 2c 24 | 41 41 41 41 3b 0d 46 55 |3C,$78,$|AAAA;.FU|
|00004730| 4e 43 54 49 4f 4e 20 47 | 65 74 4d 65 64 69 61 53 |NCTION G|etMediaS|
|00004740| 61 6d 70 6c 65 43 6f 75 | 6e 74 28 6d 3a 20 4d 65 |ampleCou|nt(m: Me|
|00004750| 64 69 61 29 3a 20 4c 4f | 4e 47 49 4e 54 3b 0d 20 |dia): LO|NGINT;. |
|00004760| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 37 39 |INLINE $|303C,$79|
|00004770| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00004780| 45 20 53 61 6d 70 6c 65 | 4e 75 6d 54 6f 4d 65 64 |E Sample|NumToMed|
|00004790| 69 61 54 69 6d 65 28 6d | 3a 20 4d 65 64 69 61 3b |iaTime(m|: Media;|
|000047a0| 6c 6f 67 69 63 61 6c 53 | 61 6d 70 6c 65 4e 75 6d |logicalS|ampleNum|
|000047b0| 3a 20 4c 4f 4e 47 49 4e | 54 3b 56 41 52 20 73 61 |: LONGIN|T;VAR sa|
|000047c0| 6d 70 6c 65 54 69 6d 65 | 3a 20 54 69 6d 65 56 61 |mpleTime|: TimeVa|
|000047d0| 6c 75 65 3b 0d 20 56 41 | 52 20 73 61 6d 70 6c 65 |lue;. VA|R sample|
|000047e0| 44 75 72 61 74 69 6f 6e | 3a 20 54 69 6d 65 56 61 |Duration|: TimeVa|
|000047f0| 6c 75 65 29 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |lue);. I|NLINE $3|
|00004800| 30 33 43 2c 24 37 41 2c | 24 41 41 41 41 3b 0d 50 |03C,$7A,|$AAAA;.P|
|00004810| 52 4f 43 45 44 55 52 45 | 20 4d 65 64 69 61 54 69 |ROCEDURE| MediaTi|
|00004820| 6d 65 54 6f 53 61 6d 70 | 6c 65 4e 75 6d 28 6d 3a |meToSamp|leNum(m:|
|00004830| 20 4d 65 64 69 61 3b 74 | 69 6d 65 3a 20 54 69 6d | Media;t|ime: Tim|
|00004840| 65 56 61 6c 75 65 3b 56 | 41 52 20 73 61 6d 70 6c |eValue;V|AR sampl|
|00004850| 65 4e 75 6d 3a 20 4c 4f | 4e 47 49 4e 54 3b 0d 20 |eNum: LO|NGINT;. |
|00004860| 56 41 52 20 73 61 6d 70 | 6c 65 54 69 6d 65 3a 20 |VAR samp|leTime: |
|00004870| 54 69 6d 65 56 61 6c 75 | 65 3b 56 41 52 20 73 61 |TimeValu|e;VAR sa|
|00004880| 6d 70 6c 65 44 75 72 61 | 74 69 6f 6e 3a 20 54 69 |mpleDura|tion: Ti|
|00004890| 6d 65 56 61 6c 75 65 29 | 3b 0d 20 49 4e 4c 49 4e |meValue)|;. INLIN|
|000048a0| 45 20 24 33 30 33 43 2c | 24 37 42 2c 24 41 41 41 |E $303C,|$7B,$AAA|
|000048b0| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 41 64 64 |A;..FUNC|TION Add|
|000048c0| 4d 65 64 69 61 53 61 6d | 70 6c 65 28 6d 3a 20 4d |MediaSam|ple(m: M|
|000048d0| 65 64 69 61 3b 64 61 74 | 61 49 6e 3a 20 48 61 6e |edia;dat|aIn: Han|
|000048e0| 64 6c 65 3b 69 6e 4f 66 | 66 73 65 74 3a 20 4c 4f |dle;inOf|fset: LO|
|000048f0| 4e 47 49 4e 54 3b 73 69 | 7a 65 3a 20 4c 4f 4e 47 |NGINT;si|ze: LONG|
|00004900| 49 4e 54 3b 0d 20 64 75 | 72 61 74 69 6f 6e 50 65 |INT;. du|rationPe|
|00004910| 72 53 61 6d 70 6c 65 3a | 20 54 69 6d 65 56 61 6c |rSample:| TimeVal|
|00004920| 75 65 3b 73 61 6d 70 6c | 65 44 65 73 63 72 69 70 |ue;sampl|eDescrip|
|00004930| 74 69 6f 6e 48 3a 20 53 | 61 6d 70 6c 65 44 65 73 |tionH: S|ampleDes|
|00004940| 63 72 69 70 74 69 6f 6e | 48 61 6e 64 6c 65 3b 0d |cription|Handle;.|
|00004950| 20 6e 75 6d 62 65 72 4f | 66 53 61 6d 70 6c 65 73 | numberO|fSamples|
|00004960| 3a 20 4c 4f 4e 47 49 4e | 54 3b 73 61 6d 70 6c 65 |: LONGIN|T;sample|
|00004970| 46 6c 61 67 73 3a 20 49 | 4e 54 45 47 45 52 3b 56 |Flags: I|NTEGER;V|
|00004980| 41 52 20 73 61 6d 70 6c | 65 54 69 6d 65 3a 20 54 |AR sampl|eTime: T|
|00004990| 69 6d 65 56 61 6c 75 65 | 29 3a 20 4f 53 45 72 72 |imeValue|): OSErr|
|000049a0| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|000049b0| 24 37 43 2c 24 41 41 41 | 41 3b 0d 46 55 4e 43 54 |$7C,$AAA|A;.FUNCT|
|000049c0| 49 4f 4e 20 41 64 64 4d | 65 64 69 61 53 61 6d 70 |ION AddM|ediaSamp|
|000049d0| 6c 65 52 65 66 65 72 65 | 6e 63 65 28 6d 3a 20 4d |leRefere|nce(m: M|
|000049e0| 65 64 69 61 3b 64 61 74 | 61 4f 66 66 73 65 74 3a |edia;dat|aOffset:|
|000049f0| 20 4c 4f 4e 47 49 4e 54 | 3b 73 69 7a 65 3a 20 4c | LONGINT|;size: L|
|00004a00| 4f 4e 47 49 4e 54 3b 0d | 20 64 75 72 61 74 69 6f |ONGINT;.| duratio|
|00004a10| 6e 50 65 72 53 61 6d 70 | 6c 65 3a 20 54 69 6d 65 |nPerSamp|le: Time|
|00004a20| 56 61 6c 75 65 3b 73 61 | 6d 70 6c 65 44 65 73 63 |Value;sa|mpleDesc|
|00004a30| 72 69 70 74 69 6f 6e 48 | 3a 20 53 61 6d 70 6c 65 |riptionH|: Sample|
|00004a40| 44 65 73 63 72 69 70 74 | 69 6f 6e 48 61 6e 64 6c |Descript|ionHandl|
|00004a50| 65 3b 0d 20 6e 75 6d 62 | 65 72 4f 66 53 61 6d 70 |e;. numb|erOfSamp|
|00004a60| 6c 65 73 3a 20 4c 4f 4e | 47 49 4e 54 3b 73 61 6d |les: LON|GINT;sam|
|00004a70| 70 6c 65 46 6c 61 67 73 | 3a 20 49 4e 54 45 47 45 |pleFlags|: INTEGE|
|00004a80| 52 3b 56 41 52 20 73 61 | 6d 70 6c 65 54 69 6d 65 |R;VAR sa|mpleTime|
|00004a90| 3a 20 54 69 6d 65 56 61 | 6c 75 65 29 3a 20 4f 53 |: TimeVa|lue): OS|
|00004aa0| 45 72 72 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |Err;. IN|LINE $30|
|00004ab0| 33 43 2c 24 37 44 2c 24 | 41 41 41 41 3b 0d 46 55 |3C,$7D,$|AAAA;.FU|
|00004ac0| 4e 43 54 49 4f 4e 20 47 | 65 74 4d 65 64 69 61 53 |NCTION G|etMediaS|
|00004ad0| 61 6d 70 6c 65 28 6d 3a | 20 4d 65 64 69 61 3b 64 |ample(m:| Media;d|
|00004ae0| 61 74 61 4f 75 74 3a 20 | 48 61 6e 64 6c 65 3b 6d |ataOut: |Handle;m|
|00004af0| 61 78 53 69 7a 65 54 6f | 47 72 6f 77 3a 20 4c 4f |axSizeTo|Grow: LO|
|00004b00| 4e 47 49 4e 54 3b 0d 20 | 56 41 52 20 73 69 7a 65 |NGINT;. |VAR size|
|00004b10| 3a 20 4c 4f 4e 47 49 4e | 54 3b 74 69 6d 65 3a 20 |: LONGIN|T;time: |
|00004b20| 54 69 6d 65 56 61 6c 75 | 65 3b 56 41 52 20 73 61 |TimeValu|e;VAR sa|
|00004b30| 6d 70 6c 65 54 69 6d 65 | 3a 20 54 69 6d 65 56 61 |mpleTime|: TimeVa|
|00004b40| 6c 75 65 3b 56 41 52 20 | 64 75 72 61 74 69 6f 6e |lue;VAR |duration|
|00004b50| 50 65 72 53 61 6d 70 6c | 65 3a 20 54 69 6d 65 56 |PerSampl|e: TimeV|
|00004b60| 61 6c 75 65 3b 0d 20 73 | 61 6d 70 6c 65 44 65 73 |alue;. s|ampleDes|
|00004b70| 63 72 69 70 74 69 6f 6e | 48 3a 20 53 61 6d 70 6c |cription|H: Sampl|
|00004b80| 65 44 65 73 63 72 69 70 | 74 69 6f 6e 48 61 6e 64 |eDescrip|tionHand|
|00004b90| 6c 65 3b 56 41 52 20 73 | 61 6d 70 6c 65 44 65 73 |le;VAR s|ampleDes|
|00004ba0| 63 72 69 70 74 69 6f 6e | 49 6e 64 65 78 3a 20 4c |cription|Index: L|
|00004bb0| 4f 4e 47 49 4e 54 3b 0d | 20 6d 61 78 4e 75 6d 62 |ONGINT;.| maxNumb|
|00004bc0| 65 72 4f 66 53 61 6d 70 | 6c 65 73 3a 20 4c 4f 4e |erOfSamp|les: LON|
|00004bd0| 47 49 4e 54 3b 56 41 52 | 20 6e 75 6d 62 65 72 4f |GINT;VAR| numberO|
|00004be0| 66 53 61 6d 70 6c 65 73 | 3a 20 4c 4f 4e 47 49 4e |fSamples|: LONGIN|
|00004bf0| 54 3b 56 41 52 20 73 61 | 6d 70 6c 65 46 6c 61 67 |T;VAR sa|mpleFlag|
|00004c00| 73 3a 20 49 4e 54 45 47 | 45 52 29 3a 20 4f 53 45 |s: INTEG|ER): OSE|
|00004c10| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|00004c20| 43 2c 24 37 45 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$7E,$A|AAA;.FUN|
|00004c30| 43 54 49 4f 4e 20 47 65 | 74 4d 65 64 69 61 53 61 |CTION Ge|tMediaSa|
|00004c40| 6d 70 6c 65 52 65 66 65 | 72 65 6e 63 65 28 6d 3a |mpleRefe|rence(m:|
|00004c50| 20 4d 65 64 69 61 3b 56 | 41 52 20 64 61 74 61 4f | Media;V|AR dataO|
|00004c60| 66 66 73 65 74 3a 20 4c | 4f 4e 47 49 4e 54 3b 56 |ffset: L|ONGINT;V|
|00004c70| 41 52 20 73 69 7a 65 3a | 20 4c 4f 4e 47 49 4e 54 |AR size:| LONGINT|
|00004c80| 3b 0d 20 74 69 6d 65 3a | 20 54 69 6d 65 56 61 6c |;. time:| TimeVal|
|00004c90| 75 65 3b 56 41 52 20 73 | 61 6d 70 6c 65 54 69 6d |ue;VAR s|ampleTim|
|00004ca0| 65 3a 20 54 69 6d 65 56 | 61 6c 75 65 3b 56 41 52 |e: TimeV|alue;VAR|
|00004cb0| 20 64 75 72 61 74 69 6f | 6e 50 65 72 53 61 6d 70 | duratio|nPerSamp|
|00004cc0| 6c 65 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 0d 20 |le: Time|Value;. |
|00004cd0| 73 61 6d 70 6c 65 44 65 | 73 63 72 69 70 74 69 6f |sampleDe|scriptio|
|00004ce0| 6e 48 3a 20 53 61 6d 70 | 6c 65 44 65 73 63 72 69 |nH: Samp|leDescri|
|00004cf0| 70 74 69 6f 6e 48 61 6e | 64 6c 65 3b 56 41 52 20 |ptionHan|dle;VAR |
|00004d00| 73 61 6d 70 6c 65 44 65 | 73 63 72 69 70 74 69 6f |sampleDe|scriptio|
|00004d10| 6e 49 6e 64 65 78 3a 20 | 4c 4f 4e 47 49 4e 54 3b |nIndex: |LONGINT;|
|00004d20| 0d 20 6d 61 78 4e 75 6d | 62 65 72 4f 66 53 61 6d |. maxNum|berOfSam|
|00004d30| 70 6c 65 73 3a 20 4c 4f | 4e 47 49 4e 54 3b 56 41 |ples: LO|NGINT;VA|
|00004d40| 52 20 6e 75 6d 62 65 72 | 4f 66 53 61 6d 70 6c 65 |R number|OfSample|
|00004d50| 73 3a 20 4c 4f 4e 47 49 | 4e 54 3b 56 41 52 20 73 |s: LONGI|NT;VAR s|
|00004d60| 61 6d 70 6c 65 46 6c 61 | 67 73 3a 20 49 4e 54 45 |ampleFla|gs: INTE|
|00004d70| 47 45 52 29 3a 20 4f 53 | 45 72 72 3b 0d 20 49 4e |GER): OS|Err;. IN|
|00004d80| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 37 46 2c 24 |LINE $30|3C,$7F,$|
|00004d90| 41 41 41 41 3b 0d 0d 46 | 55 4e 43 54 49 4f 4e 20 |AAAA;..F|UNCTION |
|00004da0| 53 65 74 4d 65 64 69 61 | 53 68 61 64 6f 77 53 79 |SetMedia|ShadowSy|
|00004db0| 6e 63 28 6d 3a 20 4d 65 | 64 69 61 3b 20 66 72 61 |nc(m: Me|dia; fra|
|00004dc0| 6d 65 44 69 66 66 53 61 | 6d 70 6c 65 4e 75 6d 3a |meDiffSa|mpleNum:|
|00004dd0| 20 4c 4f 4e 47 49 4e 54 | 3b 20 73 79 6e 63 53 61 | LONGINT|; syncSa|
|00004de0| 6d 70 6c 65 4e 75 6d 3a | 20 4c 4f 4e 47 49 4e 54 |mpleNum:| LONGINT|
|00004df0| 29 3a 20 4f 53 45 72 72 | 3b 0d 20 49 4e 4c 49 4e |): OSErr|;. INLIN|
|00004e00| 45 20 24 33 30 33 43 2c | 24 31 32 31 2c 24 41 41 |E $303C,|$121,$AA|
|00004e10| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 47 65 74 |AA;.FUNC|TION Get|
|00004e20| 4d 65 64 69 61 53 68 61 | 64 6f 77 53 79 6e 63 28 |MediaSha|dowSync(|
|00004e30| 6d 3a 20 4d 65 64 69 61 | 3b 20 66 72 61 6d 65 44 |m: Media|; frameD|
|00004e40| 69 66 66 53 61 6d 70 6c | 65 4e 75 6d 3a 20 4c 4f |iffSampl|eNum: LO|
|00004e50| 4e 47 49 4e 54 3b 20 56 | 41 52 20 73 79 6e 63 53 |NGINT; V|AR syncS|
|00004e60| 61 6d 70 6c 65 4e 75 6d | 3a 20 4c 4f 4e 47 49 4e |ampleNum|: LONGIN|
|00004e70| 54 29 3a 20 4f 53 45 72 | 72 3b 0d 20 49 4e 4c 49 |T): OSEr|r;. INLI|
|00004e80| 4e 45 20 24 33 30 33 43 | 2c 24 31 32 32 2c 24 41 |NE $303C|,$122,$A|
|00004e90| 41 41 41 3b 0d 0d 0d 7b | 20 20 48 69 67 68 20 6c |AAA;...{|  High l|
|00004ea0| 65 76 65 6c 20 65 64 69 | 74 69 6e 67 20 52 6f 75 |evel edi|ting Rou|
|00004eb0| 74 69 6e 65 73 20 20 7d | 0d 46 55 4e 43 54 49 4f |tines  }|.FUNCTIO|
|00004ec0| 4e 20 43 75 74 4d 6f 76 | 69 65 53 65 6c 65 63 74 |N CutMov|ieSelect|
|00004ed0| 69 6f 6e 28 6d 3a 20 4d | 6f 76 69 65 29 3a 20 4d |ion(m: M|ovie): M|
|00004ee0| 6f 76 69 65 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |ovie;. I|NLINE $3|
|00004ef0| 30 33 43 2c 24 38 44 2c | 24 41 41 41 41 3b 0d 46 |03C,$8D,|$AAAA;.F|
|00004f00| 55 4e 43 54 49 4f 4e 20 | 43 6f 70 79 4d 6f 76 69 |UNCTION |CopyMovi|
|00004f10| 65 53 65 6c 65 63 74 69 | 6f 6e 28 6d 3a 20 4d 6f |eSelecti|on(m: Mo|
|00004f20| 76 69 65 29 3a 20 4d 6f | 76 69 65 3b 0d 20 49 4e |vie): Mo|vie;. IN|
|00004f30| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 38 45 2c 24 |LINE $30|3C,$8E,$|
|00004f40| 41 41 41 41 3b 0d 50 52 | 4f 43 45 44 55 52 45 20 |AAAA;.PR|OCEDURE |
|00004f50| 50 61 73 74 65 4d 6f 76 | 69 65 53 65 6c 65 63 74 |PasteMov|ieSelect|
|00004f60| 69 6f 6e 28 6d 3a 20 4d | 6f 76 69 65 3b 73 72 63 |ion(m: M|ovie;src|
|00004f70| 3a 20 4d 6f 76 69 65 29 | 3b 0d 20 49 4e 4c 49 4e |: Movie)|;. INLIN|
|00004f80| 45 20 24 33 30 33 43 2c | 24 38 46 2c 24 41 41 41 |E $303C,|$8F,$AAA|
|00004f90| 41 3b 0d 50 52 4f 43 45 | 44 55 52 45 20 41 64 64 |A;.PROCE|DURE Add|
|00004fa0| 4d 6f 76 69 65 53 65 6c | 65 63 74 69 6f 6e 28 6d |MovieSel|ection(m|
|00004fb0| 3a 20 4d 6f 76 69 65 3b | 73 72 63 3a 20 4d 6f 76 |: Movie;|src: Mov|
|00004fc0| 69 65 29 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |ie);. IN|LINE $30|
|00004fd0| 33 43 2c 24 31 35 32 2c | 24 41 41 41 41 3b 0d 50 |3C,$152,|$AAAA;.P|
|00004fe0| 52 4f 43 45 44 55 52 45 | 20 43 6c 65 61 72 4d 6f |ROCEDURE| ClearMo|
|00004ff0| 76 69 65 53 65 6c 65 63 | 74 69 6f 6e 28 6d 3a 20 |vieSelec|tion(m: |
|00005000| 4d 6f 76 69 65 29 3b 0d | 20 49 4e 4c 49 4e 45 20 |Movie);.| INLINE |
|00005010| 24 33 30 33 43 2c 24 45 | 31 2c 24 41 41 41 41 3b |$303C,$E|1,$AAAA;|
|00005020| 0d 46 55 4e 43 54 49 4f | 4e 20 50 61 73 74 65 48 |.FUNCTIO|N PasteH|
|00005030| 61 6e 64 6c 65 49 6e 74 | 6f 4d 6f 76 69 65 28 68 |andleInt|oMovie(h|
|00005040| 3a 20 48 61 6e 64 6c 65 | 3b 20 68 61 6e 64 6c 65 |: Handle|; handle|
|00005050| 54 79 70 65 3a 20 4f 53 | 54 79 70 65 3b 20 6d 3a |Type: OS|Type; m:|
|00005060| 20 4d 6f 76 69 65 3b 20 | 66 6c 61 67 73 3a 20 4c | Movie; |flags: L|
|00005070| 4f 4e 47 49 4e 54 3b 20 | 75 73 65 72 43 6f 6d 70 |ONGINT; |userComp|
|00005080| 3a 20 43 6f 6d 70 6f 6e | 65 6e 74 49 6e 73 74 61 |: Compon|entInsta|
|00005090| 6e 63 65 29 3a 20 4f 53 | 45 72 72 3b 0d 20 49 4e |nce): OS|Err;. IN|
|000050a0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 43 42 2c 24 |LINE $30|3C,$CB,$|
|000050b0| 41 41 41 41 3b 0d 46 55 | 4e 43 54 49 4f 4e 20 50 |AAAA;.FU|NCTION P|
|000050c0| 75 74 4d 6f 76 69 65 49 | 6e 74 6f 54 79 70 65 64 |utMovieI|ntoTyped|
|000050d0| 48 61 6e 64 6c 65 28 6d | 3a 20 4d 6f 76 69 65 3b |Handle(m|: Movie;|
|000050e0| 20 74 61 72 67 65 74 54 | 72 61 63 6b 3a 20 54 72 | targetT|rack: Tr|
|000050f0| 61 63 6b 3b 20 68 61 6e | 64 6c 65 54 79 70 65 3a |ack; han|dleType:|
|00005100| 20 4f 53 54 79 70 65 3b | 20 70 75 62 6c 69 63 4d | OSType;| publicM|
|00005110| 6f 76 69 65 3a 20 48 61 | 6e 64 6c 65 3b 0d 20 73 |ovie: Ha|ndle;. s|
|00005120| 74 61 72 74 3a 20 54 69 | 6d 65 56 61 6c 75 65 3b |tart: Ti|meValue;|
|00005130| 20 64 75 72 3a 20 54 69 | 6d 65 56 61 6c 75 65 3b | dur: Ti|meValue;|
|00005140| 20 66 6c 61 67 73 3a 20 | 4c 4f 4e 47 49 4e 54 3b | flags: |LONGINT;|
|00005150| 20 75 73 65 72 43 6f 6d | 70 3a 20 43 6f 6d 70 6f | userCom|p: Compo|
|00005160| 6e 65 6e 74 49 6e 73 74 | 61 6e 63 65 29 3a 20 4f |nentInst|ance): O|
|00005170| 53 45 72 72 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |SErr;. I|NLINE $3|
|00005180| 30 33 43 2c 24 31 43 44 | 2c 24 41 41 41 41 3b 0d |03C,$1CD|,$AAAA;.|
|00005190| 46 55 4e 43 54 49 4f 4e | 20 49 73 53 63 72 61 70 |FUNCTION| IsScrap|
|000051a0| 4d 6f 76 69 65 28 74 61 | 72 67 65 74 54 72 61 63 |Movie(ta|rgetTrac|
|000051b0| 6b 3a 20 54 72 61 63 6b | 29 3a 20 43 6f 6d 70 6f |k: Track|): Compo|
|000051c0| 6e 65 6e 74 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |nent;. I|NLINE $3|
|000051d0| 30 33 43 2c 24 43 43 2c | 24 41 41 41 41 3b 0d 46 |03C,$CC,|$AAAA;.F|
|000051e0| 55 4e 43 54 49 4f 4e 20 | 50 75 74 4d 6f 76 69 65 |UNCTION |PutMovie|
|000051f0| 49 6e 74 6f 44 61 74 61 | 46 6f 72 6b 28 6d 3a 20 |IntoData|Fork(m: |
|00005200| 4d 6f 76 69 65 3b 20 66 | 52 65 66 4e 75 6d 3a 20 |Movie; f|RefNum: |
|00005210| 49 4e 54 45 47 45 52 3b | 20 6f 66 66 73 65 74 3a |INTEGER;| offset:|
|00005220| 20 4c 4f 4e 47 49 4e 54 | 3b 20 6d 61 78 53 69 7a | LONGINT|; maxSiz|
|00005230| 65 3a 20 4c 4f 4e 47 49 | 4e 54 29 3a 20 4f 53 45 |e: LONGI|NT): OSE|
|00005240| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|00005250| 43 2c 24 31 42 34 2c 24 | 41 41 41 41 3b 0d 0d 0d |C,$1B4,$|AAAA;...|
|00005260| 7b 20 20 4d 69 64 64 6c | 65 2d 6c 65 76 65 6c 20 |{  Middl|e-level |
|00005270| 45 64 69 74 69 6e 67 20 | 52 6f 75 74 69 6e 65 73 |Editing |Routines|
|00005280| 20 20 7d 0d 46 55 4e 43 | 54 49 4f 4e 20 49 6e 73 |  }.FUNC|TION Ins|
|00005290| 65 72 74 54 72 61 63 6b | 53 65 67 6d 65 6e 74 28 |ertTrack|Segment(|
|000052a0| 73 72 63 54 72 61 63 6b | 3a 20 54 72 61 63 6b 3b |srcTrack|: Track;|
|000052b0| 64 73 74 54 72 61 63 6b | 3a 20 54 72 61 63 6b 3b |dstTrack|: Track;|
|000052c0| 73 72 63 49 6e 3a 20 54 | 69 6d 65 56 61 6c 75 65 |srcIn: T|imeValue|
|000052d0| 3b 0d 20 73 72 63 44 75 | 72 61 74 69 6f 6e 3a 20 |;. srcDu|ration: |
|000052e0| 54 69 6d 65 56 61 6c 75 | 65 3b 64 73 74 49 6e 3a |TimeValu|e;dstIn:|
|000052f0| 20 54 69 6d 65 56 61 6c | 75 65 29 3a 20 4f 53 45 | TimeVal|ue): OSE|
|00005300| 72 72 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |rr;. INL|INE $303|
|00005310| 43 2c 24 38 35 2c 24 41 | 41 41 41 3b 0d 46 55 4e |C,$85,$A|AAA;.FUN|
|00005320| 43 54 49 4f 4e 20 49 6e | 73 65 72 74 4d 6f 76 69 |CTION In|sertMovi|
|00005330| 65 53 65 67 6d 65 6e 74 | 28 73 72 63 4d 6f 76 69 |eSegment|(srcMovi|
|00005340| 65 3a 20 4d 6f 76 69 65 | 3b 64 73 74 4d 6f 76 69 |e: Movie|;dstMovi|
|00005350| 65 3a 20 4d 6f 76 69 65 | 3b 73 72 63 49 6e 3a 20 |e: Movie|;srcIn: |
|00005360| 54 69 6d 65 56 61 6c 75 | 65 3b 0d 20 73 72 63 44 |TimeValu|e;. srcD|
|00005370| 75 72 61 74 69 6f 6e 3a | 20 54 69 6d 65 56 61 6c |uration:| TimeVal|
|00005380| 75 65 3b 64 73 74 49 6e | 3a 20 54 69 6d 65 56 61 |ue;dstIn|: TimeVa|
|00005390| 6c 75 65 29 3a 20 4f 53 | 45 72 72 3b 0d 20 49 4e |lue): OS|Err;. IN|
|000053a0| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 38 36 2c 24 |LINE $30|3C,$86,$|
|000053b0| 41 41 41 41 3b 0d 46 55 | 4e 43 54 49 4f 4e 20 49 |AAAA;.FU|NCTION I|
|000053c0| 6e 73 65 72 74 45 6d 70 | 74 79 54 72 61 63 6b 53 |nsertEmp|tyTrackS|
|000053d0| 65 67 6d 65 6e 74 28 64 | 73 74 54 72 61 63 6b 3a |egment(d|stTrack:|
|000053e0| 20 54 72 61 63 6b 3b 64 | 73 74 49 6e 3a 20 54 69 | Track;d|stIn: Ti|
|000053f0| 6d 65 56 61 6c 75 65 3b | 64 73 74 44 75 72 61 74 |meValue;|dstDurat|
|00005400| 69 6f 6e 3a 20 54 69 6d | 65 56 61 6c 75 65 29 3a |ion: Tim|eValue):|
|00005410| 20 4f 53 45 72 72 3b 0d | 20 49 4e 4c 49 4e 45 20 | OSErr;.| INLINE |
|00005420| 24 33 30 33 43 2c 24 38 | 37 2c 24 41 41 41 41 3b |$303C,$8|7,$AAAA;|
|00005430| 0d 46 55 4e 43 54 49 4f | 4e 20 49 6e 73 65 72 74 |.FUNCTIO|N Insert|
|00005440| 45 6d 70 74 79 4d 6f 76 | 69 65 53 65 67 6d 65 6e |EmptyMov|ieSegmen|
|00005450| 74 28 64 73 74 4d 6f 76 | 69 65 3a 20 4d 6f 76 69 |t(dstMov|ie: Movi|
|00005460| 65 3b 64 73 74 49 6e 3a | 20 54 69 6d 65 56 61 6c |e;dstIn:| TimeVal|
|00005470| 75 65 3b 64 73 74 44 75 | 72 61 74 69 6f 6e 3a 20 |ue;dstDu|ration: |
|00005480| 54 69 6d 65 56 61 6c 75 | 65 29 3a 20 4f 53 45 72 |TimeValu|e): OSEr|
|00005490| 72 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |r;. INLI|NE $303C|
|000054a0| 2c 24 38 38 2c 24 41 41 | 41 41 3b 0d 46 55 4e 43 |,$88,$AA|AA;.FUNC|
|000054b0| 54 49 4f 4e 20 44 65 6c | 65 74 65 54 72 61 63 6b |TION Del|eteTrack|
|000054c0| 53 65 67 6d 65 6e 74 28 | 74 3a 20 54 72 61 63 6b |Segment(|t: Track|
|000054d0| 3b 64 73 74 49 6e 3a 20 | 54 69 6d 65 56 61 6c 75 |;dstIn: |TimeValu|
|000054e0| 65 3b 64 75 72 61 74 69 | 6f 6e 3a 20 54 69 6d 65 |e;durati|on: Time|
|000054f0| 56 61 6c 75 65 29 3a 20 | 4f 53 45 72 72 3b 0d 20 |Value): |OSErr;. |
|00005500| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 38 39 |INLINE $|303C,$89|
|00005510| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|00005520| 20 44 65 6c 65 74 65 4d | 6f 76 69 65 53 65 67 6d | DeleteM|ovieSegm|
|00005530| 65 6e 74 28 6d 3a 20 4d | 6f 76 69 65 3b 64 73 74 |ent(m: M|ovie;dst|
|00005540| 49 6e 3a 20 54 69 6d 65 | 56 61 6c 75 65 3b 64 75 |In: Time|Value;du|
|00005550| 72 61 74 69 6f 6e 3a 20 | 54 69 6d 65 56 61 6c 75 |ration: |TimeValu|
|00005560| 65 29 3a 20 4f 53 45 72 | 72 3b 0d 20 49 4e 4c 49 |e): OSEr|r;. INLI|
|00005570| 4e 45 20 24 33 30 33 43 | 2c 24 38 41 2c 24 41 41 |NE $303C|,$8A,$AA|
|00005580| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 53 63 61 |AA;.FUNC|TION Sca|
|00005590| 6c 65 54 72 61 63 6b 53 | 65 67 6d 65 6e 74 28 74 |leTrackS|egment(t|
|000055a0| 3a 20 54 72 61 63 6b 3b | 64 73 74 49 6e 3a 20 54 |: Track;|dstIn: T|
|000055b0| 69 6d 65 56 61 6c 75 65 | 3b 6f 6c 64 44 75 72 61 |imeValue|;oldDura|
|000055c0| 74 69 6f 6e 3a 20 54 69 | 6d 65 56 61 6c 75 65 3b |tion: Ti|meValue;|
|000055d0| 0d 20 6e 65 77 44 75 72 | 61 74 69 6f 6e 3a 20 54 |. newDur|ation: T|
|000055e0| 69 6d 65 56 61 6c 75 65 | 29 3a 20 4f 53 45 72 72 |imeValue|): OSErr|
|000055f0| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00005600| 24 38 42 2c 24 41 41 41 | 41 3b 0d 46 55 4e 43 54 |$8B,$AAA|A;.FUNCT|
|00005610| 49 4f 4e 20 53 63 61 6c | 65 4d 6f 76 69 65 53 65 |ION Scal|eMovieSe|
|00005620| 67 6d 65 6e 74 28 6d 3a | 20 4d 6f 76 69 65 3b 64 |gment(m:| Movie;d|
|00005630| 73 74 49 6e 3a 20 54 69 | 6d 65 56 61 6c 75 65 3b |stIn: Ti|meValue;|
|00005640| 6f 6c 64 44 75 72 61 74 | 69 6f 6e 3a 20 54 69 6d |oldDurat|ion: Tim|
|00005650| 65 56 61 6c 75 65 3b 0d | 20 6e 65 77 44 75 72 61 |eValue;.| newDura|
|00005660| 74 69 6f 6e 3a 20 54 69 | 6d 65 56 61 6c 75 65 29 |tion: Ti|meValue)|
|00005670| 3a 20 4f 53 45 72 72 3b | 0d 20 49 4e 4c 49 4e 45 |: OSErr;|. INLINE|
|00005680| 20 24 33 30 33 43 2c 24 | 38 43 2c 24 41 41 41 41 | $303C,$|8C,$AAAA|
|00005690| 3b 0d 0d 46 55 4e 43 54 | 49 4f 4e 20 43 6f 70 79 |;..FUNCT|ION Copy|
|000056a0| 54 72 61 63 6b 53 65 74 | 74 69 6e 67 73 28 73 72 |TrackSet|tings(sr|
|000056b0| 63 54 72 61 63 6b 3a 20 | 54 72 61 63 6b 3b 64 73 |cTrack: |Track;ds|
|000056c0| 74 54 72 61 63 6b 3a 20 | 54 72 61 63 6b 29 3a 20 |tTrack: |Track): |
|000056d0| 4f 53 45 72 72 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |OSErr;. |INLINE $|
|000056e0| 33 30 33 43 2c 24 31 35 | 33 2c 24 41 41 41 41 3b |303C,$15|3,$AAAA;|
|000056f0| 0d 46 55 4e 43 54 49 4f | 4e 20 43 6f 70 79 4d 6f |.FUNCTIO|N CopyMo|
|00005700| 76 69 65 53 65 74 74 69 | 6e 67 73 28 73 72 63 4d |vieSetti|ngs(srcM|
|00005710| 6f 76 69 65 3a 20 4d 6f | 76 69 65 3b 64 73 74 4d |ovie: Mo|vie;dstM|
|00005720| 6f 76 69 65 3a 20 4d 6f | 76 69 65 29 3a 20 4f 53 |ovie: Mo|vie): OS|
|00005730| 45 72 72 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |Err;. IN|LINE $30|
|00005740| 33 43 2c 24 31 35 34 2c | 24 41 41 41 41 3b 0d 0d |3C,$154,|$AAAA;..|
|00005750| 0d 7b 20 20 6c 6f 77 2d | 6c 65 76 65 6c 20 45 64 |.{  low-|level Ed|
|00005760| 69 74 69 6e 67 20 52 6f | 75 74 69 6e 65 73 20 20 |iting Ro|utines  |
|00005770| 7d 0d 46 55 4e 43 54 49 | 4f 4e 20 49 6e 73 65 72 |}.FUNCTI|ON Inser|
|00005780| 74 4d 65 64 69 61 49 6e | 74 6f 54 72 61 63 6b 28 |tMediaIn|toTrack(|
|00005790| 74 3a 20 54 72 61 63 6b | 3b 74 72 61 63 6b 53 74 |t: Track|;trackSt|
|000057a0| 61 72 74 3a 20 54 69 6d | 65 56 61 6c 75 65 3b 6d |art: Tim|eValue;m|
|000057b0| 65 64 69 61 54 69 6d 65 | 3a 20 54 69 6d 65 56 61 |ediaTime|: TimeVa|
|000057c0| 6c 75 65 3b 0d 20 6d 65 | 64 69 61 44 75 72 61 74 |lue;. me|diaDurat|
|000057d0| 69 6f 6e 3a 20 54 69 6d | 65 56 61 6c 75 65 3b 6d |ion: Tim|eValue;m|
|000057e0| 65 64 69 61 52 61 74 65 | 3a 20 46 69 78 65 64 29 |ediaRate|: Fixed)|
|000057f0| 3a 20 4f 53 45 72 72 3b | 0d 20 49 4e 4c 49 4e 45 |: OSErr;|. INLINE|
|00005800| 20 24 33 30 33 43 2c 24 | 31 38 33 2c 24 41 41 41 | $303C,$|183,$AAA|
|00005810| 41 3b 0d 0d 46 55 4e 43 | 54 49 4f 4e 20 42 65 67 |A;..FUNC|TION Beg|
|00005820| 69 6e 4d 65 64 69 61 45 | 64 69 74 73 28 6d 3a 20 |inMediaE|dits(m: |
|00005830| 4d 65 64 69 61 29 3a 20 | 4f 53 45 72 72 3b 0d 20 |Media): |OSErr;. |
|00005840| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 37 32 |INLINE $|303C,$72|
|00005850| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|00005860| 20 45 6e 64 4d 65 64 69 | 61 45 64 69 74 73 28 6d | EndMedi|aEdits(m|
|00005870| 3a 20 4d 65 64 69 61 29 | 3a 20 4f 53 45 72 72 3b |: Media)|: OSErr;|
|00005880| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00005890| 37 33 2c 24 41 41 41 41 | 3b 0d 0d 0d 7b 20 20 6d |73,$AAAA|;...{  m|
|000058a0| 6f 76 69 65 20 26 20 74 | 72 61 63 6b 20 65 64 69 |ovie & t|rack edi|
|000058b0| 74 20 73 74 61 74 65 20 | 52 6f 75 74 69 6e 65 73 |t state |Routines|
|000058c0| 20 20 7d 0d 46 55 4e 43 | 54 49 4f 4e 20 4e 65 77 |  }.FUNC|TION New|
|000058d0| 4d 6f 76 69 65 45 64 69 | 74 53 74 61 74 65 28 6d |MovieEdi|tState(m|
|000058e0| 3a 20 4d 6f 76 69 65 29 | 3a 20 4d 6f 76 69 65 45 |: Movie)|: MovieE|
|000058f0| 64 69 74 53 74 61 74 65 | 3b 0d 20 49 4e 4c 49 4e |ditState|;. INLIN|
|00005900| 45 20 24 33 30 33 43 2c | 24 31 30 34 2c 24 41 41 |E $303C,|$104,$AA|
|00005910| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 55 73 65 |AA;.FUNC|TION Use|
|00005920| 4d 6f 76 69 65 45 64 69 | 74 53 74 61 74 65 28 6d |MovieEdi|tState(m|
|00005930| 3a 20 4d 6f 76 69 65 3b | 74 6f 53 74 61 74 65 3a |: Movie;|toState:|
|00005940| 20 4d 6f 76 69 65 45 64 | 69 74 53 74 61 74 65 29 | MovieEd|itState)|
|00005950| 3a 20 4f 53 45 72 72 3b | 0d 20 49 4e 4c 49 4e 45 |: OSErr;|. INLINE|
|00005960| 20 24 33 30 33 43 2c 24 | 31 30 35 2c 24 41 41 41 | $303C,$|105,$AAA|
|00005970| 41 3b 0d 46 55 4e 43 54 | 49 4f 4e 20 44 69 73 70 |A;.FUNCT|ION Disp|
|00005980| 6f 73 65 4d 6f 76 69 65 | 45 64 69 74 53 74 61 74 |oseMovie|EditStat|
|00005990| 65 28 73 74 61 74 65 3a | 20 4d 6f 76 69 65 45 64 |e(state:| MovieEd|
|000059a0| 69 74 53 74 61 74 65 29 | 3a 20 4f 53 45 72 72 3b |itState)|: OSErr;|
|000059b0| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|000059c0| 31 30 36 2c 24 41 41 41 | 41 3b 0d 0d 46 55 4e 43 |106,$AAA|A;..FUNC|
|000059d0| 54 49 4f 4e 20 4e 65 77 | 54 72 61 63 6b 45 64 69 |TION New|TrackEdi|
|000059e0| 74 53 74 61 74 65 28 74 | 3a 20 54 72 61 63 6b 29 |tState(t|: Track)|
|000059f0| 3a 20 54 72 61 63 6b 45 | 64 69 74 53 74 61 74 65 |: TrackE|ditState|
|00005a00| 3b 0d 20 49 4e 4c 49 4e | 45 20 24 33 30 33 43 2c |;. INLIN|E $303C,|
|00005a10| 24 31 30 37 2c 24 41 41 | 41 41 3b 0d 46 55 4e 43 |$107,$AA|AA;.FUNC|
|00005a20| 54 49 4f 4e 20 55 73 65 | 54 72 61 63 6b 45 64 69 |TION Use|TrackEdi|
|00005a30| 74 53 74 61 74 65 28 74 | 3a 20 54 72 61 63 6b 3b |tState(t|: Track;|
|00005a40| 73 74 61 74 65 3a 20 54 | 72 61 63 6b 45 64 69 74 |state: T|rackEdit|
|00005a50| 53 74 61 74 65 29 3a 20 | 4f 53 45 72 72 3b 0d 20 |State): |OSErr;. |
|00005a60| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 31 30 |INLINE $|303C,$10|
|00005a70| 38 2c 24 41 41 41 41 3b | 0d 46 55 4e 43 54 49 4f |8,$AAAA;|.FUNCTIO|
|00005a80| 4e 20 44 69 73 70 6f 73 | 65 54 72 61 63 6b 45 64 |N Dispos|eTrackEd|
|00005a90| 69 74 53 74 61 74 65 28 | 73 74 61 74 65 3a 20 54 |itState(|state: T|
|00005aa0| 72 61 63 6b 45 64 69 74 | 53 74 61 74 65 29 3a 20 |rackEdit|State): |
|00005ab0| 4f 53 45 72 72 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |OSErr;. |INLINE $|
|00005ac0| 33 30 33 43 2c 24 31 30 | 39 2c 24 41 41 41 41 3b |303C,$10|9,$AAAA;|
|00005ad0| 0d 0d 0d 7b 20 20 4d 69 | 73 63 65 6c 6c 61 6e 65 |...{  Mi|scellane|
|00005ae0| 6f 75 73 20 52 6f 75 74 | 69 6e 65 73 20 20 7d 0d |ous Rout|ines  }.|
|00005af0| 46 55 4e 43 54 49 4f 4e | 20 54 72 61 63 6b 54 69 |FUNCTION| TrackTi|
|00005b00| 6d 65 54 6f 4d 65 64 69 | 61 54 69 6d 65 28 76 61 |meToMedi|aTime(va|
|00005b10| 6c 75 65 3a 20 54 69 6d | 65 56 61 6c 75 65 3b 74 |lue: Tim|eValue;t|
|00005b20| 3a 20 54 72 61 63 6b 29 | 3a 20 54 69 6d 65 56 61 |: Track)|: TimeVa|
|00005b30| 6c 75 65 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |lue;. IN|LINE $30|
|00005b40| 33 43 2c 24 39 36 2c 24 | 41 41 41 41 3b 0d 46 55 |3C,$96,$|AAAA;.FU|
|00005b50| 4e 43 54 49 4f 4e 20 47 | 65 74 54 72 61 63 6b 45 |NCTION G|etTrackE|
|00005b60| 64 69 74 52 61 74 65 28 | 74 3a 20 54 72 61 63 6b |ditRate(|t: Track|
|00005b70| 3b 61 74 54 69 6d 65 3a | 20 54 69 6d 65 56 61 6c |;atTime:| TimeVal|
|00005b80| 75 65 29 3a 20 46 69 78 | 65 64 3b 0d 20 49 4e 4c |ue): Fix|ed;. INL|
|00005b90| 49 4e 45 20 24 33 30 33 | 43 2c 24 31 32 33 2c 24 |INE $303|C,$123,$|
|00005ba0| 41 41 41 41 3b 0d 0d 46 | 55 4e 43 54 49 4f 4e 20 |AAAA;..F|UNCTION |
|00005bb0| 47 65 74 4d 6f 76 69 65 | 44 61 74 61 53 69 7a 65 |GetMovie|DataSize|
|00005bc0| 28 6d 3a 20 4d 6f 76 69 | 65 3b 73 74 61 72 74 54 |(m: Movi|e;startT|
|00005bd0| 69 6d 65 3a 20 54 69 6d | 65 56 61 6c 75 65 3b 64 |ime: Tim|eValue;d|
|00005be0| 75 72 61 74 69 6f 6e 3a | 20 54 69 6d 65 56 61 6c |uration:| TimeVal|
|00005bf0| 75 65 29 3a 20 4c 4f 4e | 47 49 4e 54 3b 0d 20 49 |ue): LON|GINT;. I|
|00005c00| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 39 38 2c |NLINE $3|03C,$98,|
|00005c10| 24 41 41 41 41 3b 0d 46 | 55 4e 43 54 49 4f 4e 20 |$AAAA;.F|UNCTION |
|00005c20| 47 65 74 54 72 61 63 6b | 44 61 74 61 53 69 7a 65 |GetTrack|DataSize|
|00005c30| 28 74 3a 20 54 72 61 63 | 6b 3b 73 74 61 72 74 54 |(t: Trac|k;startT|
|00005c40| 69 6d 65 3a 20 54 69 6d | 65 56 61 6c 75 65 3b 64 |ime: Tim|eValue;d|
|00005c50| 75 72 61 74 69 6f 6e 3a | 20 54 69 6d 65 56 61 6c |uration:| TimeVal|
|00005c60| 75 65 29 3a 20 4c 4f 4e | 47 49 4e 54 3b 0d 20 49 |ue): LON|GINT;. I|
|00005c70| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 31 34 39 |NLINE $3|03C,$149|
|00005c80| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|00005c90| 20 47 65 74 4d 65 64 69 | 61 44 61 74 61 53 69 7a | GetMedi|aDataSiz|
|00005ca0| 65 28 6d 3a 20 4d 65 64 | 69 61 3b 73 74 61 72 74 |e(m: Med|ia;start|
|00005cb0| 54 69 6d 65 3a 20 54 69 | 6d 65 56 61 6c 75 65 3b |Time: Ti|meValue;|
|00005cc0| 64 75 72 61 74 69 6f 6e | 3a 20 54 69 6d 65 56 61 |duration|: TimeVa|
|00005cd0| 6c 75 65 29 3a 20 4c 4f | 4e 47 49 4e 54 3b 0d 20 |lue): LO|NGINT;. |
|00005ce0| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 39 39 |INLINE $|303C,$99|
|00005cf0| 2c 24 41 41 41 41 3b 0d | 0d 46 55 4e 43 54 49 4f |,$AAAA;.|.FUNCTIO|
|00005d00| 4e 20 50 74 49 6e 4d 6f | 76 69 65 28 6d 3a 20 4d |N PtInMo|vie(m: M|
|00005d10| 6f 76 69 65 3b 70 74 3a | 20 50 6f 69 6e 74 29 3a |ovie;pt:| Point):|
|00005d20| 20 42 4f 4f 4c 45 41 4e | 3b 0d 20 49 4e 4c 49 4e | BOOLEAN|;. INLIN|
|00005d30| 45 20 24 33 30 33 43 2c | 24 39 41 2c 24 41 41 41 |E $303C,|$9A,$AAA|
|00005d40| 41 3b 0d 46 55 4e 43 54 | 49 4f 4e 20 50 74 49 6e |A;.FUNCT|ION PtIn|
|00005d50| 54 72 61 63 6b 28 74 3a | 20 54 72 61 63 6b 3b 70 |Track(t:| Track;p|
|00005d60| 74 3a 20 50 6f 69 6e 74 | 29 3a 20 42 4f 4f 4c 45 |t: Point|): BOOLE|
|00005d70| 41 4e 3b 0d 20 49 4e 4c | 49 4e 45 20 24 33 30 33 |AN;. INL|INE $303|
|00005d80| 43 2c 24 39 42 2c 24 41 | 41 41 41 3b 0d 0d 46 55 |C,$9B,$A|AAA;..FU|
|00005d90| 4e 43 54 49 4f 4e 20 55 | 70 64 61 74 65 4d 6f 76 |NCTION U|pdateMov|
|00005da0| 69 65 28 6d 3a 20 4d 6f | 76 69 65 29 3a 20 4f 53 |ie(m: Mo|vie): OS|
|00005db0| 45 72 72 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |Err;. IN|LINE $30|
|00005dc0| 33 43 2c 24 31 46 2c 24 | 41 41 41 41 3b 0d 0d 0d |3C,$1F,$|AAAA;...|
|00005dd0| 7b 20 20 41 6c 74 65 72 | 6e 61 74 65 20 47 72 6f |{  Alter|nate Gro|
|00005de0| 75 70 20 53 65 6c 65 63 | 74 69 6f 6e 20 52 6f 75 |up Selec|tion Rou|
|00005df0| 74 69 6e 65 73 20 20 7d | 0d 50 52 4f 43 45 44 55 |tines  }|.PROCEDU|
|00005e00| 52 45 20 53 65 74 4d 6f | 76 69 65 4c 61 6e 67 75 |RE SetMo|vieLangu|
|00005e10| 61 67 65 28 6d 3a 20 4d | 6f 76 69 65 3b 6c 61 6e |age(m: M|ovie;lan|
|00005e20| 67 75 61 67 65 3a 20 4c | 4f 4e 47 49 4e 54 29 3b |guage: L|ONGINT);|
|00005e30| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00005e40| 39 43 2c 24 41 41 41 41 | 3b 0d 0d 50 52 4f 43 45 |9C,$AAAA|;..PROCE|
|00005e50| 44 55 52 45 20 53 65 74 | 41 75 74 6f 54 72 61 63 |DURE Set|AutoTrac|
|00005e60| 6b 41 6c 74 65 72 6e 61 | 74 65 73 45 6e 61 62 6c |kAlterna|tesEnabl|
|00005e70| 65 64 28 6d 3a 20 4d 6f | 76 69 65 3b 65 6e 61 62 |ed(m: Mo|vie;enab|
|00005e80| 6c 65 3a 20 42 4f 4f 4c | 45 41 4e 29 3b 0d 20 49 |le: BOOL|EAN);. I|
|00005e90| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 31 35 45 |NLINE $3|03C,$15E|
|00005ea0| 2c 24 41 41 41 41 3b 0d | 50 52 4f 43 45 44 55 52 |,$AAAA;.|PROCEDUR|
|00005eb0| 45 20 53 65 6c 65 63 74 | 4d 6f 76 69 65 41 6c 74 |E Select|MovieAlt|
|00005ec0| 65 72 6e 61 74 65 73 28 | 6d 3a 20 4d 6f 76 69 65 |ernates(|m: Movie|
|00005ed0| 29 3b 0d 20 49 4e 4c 49 | 4e 45 20 24 33 30 33 43 |);. INLI|NE $303C|
|00005ee0| 2c 24 31 35 46 2c 24 41 | 41 41 41 3b 0d 0d 0d 7b |,$15F,$A|AAA;...{|
|00005ef0| 20 20 55 73 65 72 44 61 | 74 61 20 52 6f 75 74 69 |  UserDa|ta Routi|
|00005f00| 6e 65 73 20 20 7d 0d 46 | 55 4e 43 54 49 4f 4e 20 |nes  }.F|UNCTION |
|00005f10| 47 65 74 55 73 65 72 44 | 61 74 61 28 75 3a 20 55 |GetUserD|ata(u: U|
|00005f20| 73 65 72 44 61 74 61 3b | 64 61 74 61 3a 20 48 61 |serData;|data: Ha|
|00005f30| 6e 64 6c 65 3b 75 64 54 | 79 70 65 3a 20 4f 53 54 |ndle;udT|ype: OST|
|00005f40| 79 70 65 3b 69 6e 64 65 | 78 3a 20 4c 4f 4e 47 49 |ype;inde|x: LONGI|
|00005f50| 4e 54 29 3a 20 4f 53 45 | 72 72 3b 0d 20 49 4e 4c |NT): OSE|rr;. INL|
|00005f60| 49 4e 45 20 24 33 30 33 | 43 2c 24 39 45 2c 24 41 |INE $303|C,$9E,$A|
|00005f70| 41 41 41 3b 0d 46 55 4e | 43 54 49 4f 4e 20 41 64 |AAA;.FUN|CTION Ad|
|00005f80| 64 55 73 65 72 44 61 74 | 61 28 75 3a 20 55 73 65 |dUserDat|a(u: Use|
|00005f90| 72 44 61 74 61 3b 64 61 | 74 61 3a 20 48 61 6e 64 |rData;da|ta: Hand|
|00005fa0| 6c 65 3b 75 64 54 79 70 | 65 3a 20 4f 53 54 79 70 |le;udTyp|e: OSTyp|
|00005fb0| 65 29 3a 20 4f 53 45 72 | 72 3b 0d 20 49 4e 4c 49 |e): OSEr|r;. INLI|
|00005fc0| 4e 45 20 24 33 30 33 43 | 2c 24 39 46 2c 24 41 41 |NE $303C|,$9F,$AA|
|00005fd0| 41 41 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 52 65 6d |AA;.FUNC|TION Rem|
|00005fe0| 6f 76 65 55 73 65 72 44 | 61 74 61 28 75 3a 20 55 |oveUserD|ata(u: U|
|00005ff0| 73 65 72 44 61 74 61 3b | 75 64 54 79 70 65 3a 20 |serData;|udType: |
|00006000| 4f 53 54 79 70 65 3b 69 | 6e 64 65 78 3a 20 4c 4f |OSType;i|ndex: LO|
|00006010| 4e 47 49 4e 54 29 3a 20 | 4f 53 45 72 72 3b 0d 20 |NGINT): |OSErr;. |
|00006020| 49 4e 4c 49 4e 45 20 24 | 33 30 33 43 2c 24 41 30 |INLINE $|303C,$A0|
|00006030| 2c 24 41 41 41 41 3b 0d | 46 55 4e 43 54 49 4f 4e |,$AAAA;.|FUNCTION|
|00006040| 20 43 6f 75 6e 74 55 73 | 65 72 44 61 74 61 54 79 | CountUs|erDataTy|
|00006050| 70 65 28 75 73 65 72 44 | 61 74 61 48 3a 20 55 73 |pe(userD|ataH: Us|
|00006060| 65 72 44 61 74 61 3b 75 | 64 54 79 70 65 3a 20 4f |erData;u|dType: O|
|00006070| 53 54 79 70 65 29 3a 20 | 49 4e 54 45 47 45 52 3b |SType): |INTEGER;|
|00006080| 0d 20 49 4e 4c 49 4e 45 | 20 24 33 30 33 43 2c 24 |. INLINE| $303C,$|
|00006090| 31 34 42 2c 24 41 41 41 | 41 3b 0d 46 55 4e 43 54 |14B,$AAA|A;.FUNCT|
|000060a0| 49 4f 4e 20 41 64 64 55 | 73 65 72 44 61 74 61 54 |ION AddU|serDataT|
|000060b0| 65 78 74 28 75 3a 20 55 | 73 65 72 44 61 74 61 3b |ext(u: U|serData;|
|000060c0| 64 61 74 61 3a 20 48 61 | 6e 64 6c 65 3b 75 64 54 |data: Ha|ndle;udT|
|000060d0| 79 70 65 3a 20 4f 53 54 | 79 70 65 3b 69 6e 64 65 |ype: OST|ype;inde|
|000060e0| 78 3a 20 4c 4f 4e 47 49 | 4e 54 3b 0d 20 69 74 6c |x: LONGI|NT;. itl|
|000060f0| 52 65 67 69 6f 6e 54 61 | 67 3a 20 49 4e 54 45 47 |RegionTa|g: INTEG|
|00006100| 45 52 29 3a 20 4f 53 45 | 72 72 3b 0d 20 49 4e 4c |ER): OSE|rr;. INL|
|00006110| 49 4e 45 20 24 33 30 33 | 43 2c 24 31 34 43 2c 24 |INE $303|C,$14C,$|
|00006120| 41 41 41 41 3b 0d 46 55 | 4e 43 54 49 4f 4e 20 47 |AAAA;.FU|NCTION G|
|00006130| 65 74 55 73 65 72 44 61 | 74 61 54 65 78 74 28 75 |etUserDa|taText(u|
|00006140| 3a 20 55 73 65 72 44 61 | 74 61 3b 64 61 74 61 3a |: UserDa|ta;data:|
|00006150| 20 48 61 6e 64 6c 65 3b | 75 64 54 79 70 65 3a 20 | Handle;|udType: |
|00006160| 4f 53 54 79 70 65 3b 69 | 6e 64 65 78 3a 20 4c 4f |OSType;i|ndex: LO|
|00006170| 4e 47 49 4e 54 3b 0d 20 | 69 74 6c 52 65 67 69 6f |NGINT;. |itlRegio|
|00006180| 6e 54 61 67 3a 20 49 4e | 54 45 47 45 52 29 3a 20 |nTag: IN|TEGER): |
|00006190| 4f 53 45 72 72 3b 0d 20 | 49 4e 4c 49 4e 45 20 24 |OSErr;. |INLINE $|
|000061a0| 33 30 33 43 2c 24 31 34 | 44 2c 24 41 41 41 41 3b |303C,$14|D,$AAAA;|
|000061b0| 0d 46 55 4e 43 54 49 4f | 4e 20 52 65 6d 6f 76 65 |.FUNCTIO|N Remove|
|000061c0| 55 73 65 72 44 61 74 61 | 54 65 78 74 28 75 3a 20 |UserData|Text(u: |
|000061d0| 55 73 65 72 44 61 74 61 | 3b 75 64 54 79 70 65 3a |UserData|;udType:|
|000061e0| 20 4f 53 54 79 70 65 3b | 69 6e 64 65 78 3a 20 4c | OSType;|index: L|
|000061f0| 4f 4e 47 49 4e 54 3b 69 | 74 6c 52 65 67 69 6f 6e |ONGINT;i|tlRegion|
|00006200| 54 61 67 3a 20 49 4e 54 | 45 47 45 52 29 3a 20 4f |Tag: INT|EGER): O|
|00006210| 53 45 72 72 3b 0d 20 49 | 4e 4c 49 4e 45 20 24 33 |SErr;. I|NLINE $3|
|00006220| 30 33 43 2c 24 31 34 45 | 2c 24 41 41 41 41 3b 0d |03C,$14E|,$AAAA;.|
|00006230| 0d 7b 20 4e 65 77 20 55 | 73 65 72 44 61 74 61 20 |.{ New U|serData |
|00006240| 72 6f 75 74 69 6e 65 73 | 20 7d 0d 46 55 4e 43 54 |routines| }.FUNCT|
|00006250| 49 4f 4e 20 47 65 74 4e | 65 78 74 55 73 65 72 44 |ION GetN|extUserD|
|00006260| 61 74 61 54 79 70 65 28 | 75 73 65 72 44 61 74 61 |ataType(|userData|
|00006270| 48 3a 20 55 73 65 72 44 | 61 74 61 3b 75 64 54 79 |H: UserD|ata;udTy|
|00006280| 70 65 3a 20 4f 53 54 79 | 70 65 29 3a 20 4f 53 54 |pe: OSTy|pe): OST|
|00006290| 79 70 65 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |ype;. IN|LINE $30|
|000062a0| 33 43 2c 24 31 41 35 2c | 24 41 41 41 41 3b 0d 46 |3C,$1A5,|$AAAA;.F|
|000062b0| 55 4e 43 54 49 4f 4e 20 | 47 65 74 55 73 65 72 44 |UNCTION |GetUserD|
|000062c0| 61 74 61 49 74 65 6d 28 | 75 73 65 72 44 61 74 61 |ataItem(|userData|
|000062d0| 48 3a 20 55 73 65 72 44 | 61 74 61 3b 64 61 74 61 |H: UserD|ata;data|
|000062e0| 3a 20 50 74 72 3b 73 69 | 7a 65 3a 20 4c 4f 4e 47 |: Ptr;si|ze: LONG|
|000062f0| 49 4e 54 3b 64 61 74 61 | 54 79 70 65 3a 20 4f 53 |INT;data|Type: OS|
|00006300| 54 79 70 65 3b 69 6e 64 | 65 78 3a 20 4c 4f 4e 47 |Type;ind|ex: LONG|
|00006310| 49 4e 54 29 3a 20 4f 53 | 45 72 72 3b 0d 20 49 4e |INT): OS|Err;. IN|
|00006320| 4c 49 4e 45 20 24 33 30 | 33 43 2c 24 31 32 36 2c |LINE $30|3C,$126,|
|00006330| 24 41 41 41 41 3b 0d 46 | 55 4e 43 54 49 4f 4e 20 |$AAAA;.F|UNCTION |
|00006340| 53 65 74 55 73 65 72 44 | 61 74 61 49 74 65 6d 28 |SetUserD|ataItem(|
|00006350| 75 73 65 72 44 61 74 61 | 48 3a 20 55 73 65 72 44 |userData|H: UserD|
|00006360| 61 74 61 3b 64 61 74 61 | 3a 20 50 74 72 3b 73 69 |ata;data|: Ptr;si|
|00006370| 7a 65 3a 20 4c 4f 4e 47 | 49 4e 54 3b 64 61 74 61 |ze: LONG|INT;data|
|00006380| 54 79 70 65 3a 20 4f 53 | 54 79 70 65 3b 69 6e 64 |Type: OS|Type;ind|
|00006390| 65 78 3a 20 4c 4f 4e 47 | 49 4e 54 29 3a 20 4f 53 |ex: LONG|INT): OS|
|000063a0| 45 72 72 3b 0d 20 49 4e | 4c 49 4e 45 20 24 33 30 |Err;. IN|LINE $30|
|000063b0| 33 43 2c 24 31 32 45 2c | 24 41 41 41 41 3b 0d 46 |3C,$12E,|$AAAA;.F|
|000063c0| 55 4e 43 54 49 4f 4e 20 | 4e 65 77 55 73 65 72 44 |UNCTION |NewUserD|
|000063d0| 61 74 61 28 56 41 52 20 | 75 64 3a 20 55 73 65 72 |ata(VAR |ud: User|
|000063e0| 44 61 74 61 29 3a 20 4f | 53 45 72 72 3b 0d 20 49 |Data): O|SErr;. I|
|000063f0| 4e 4c 49 4e 45 20 24 33 | 30 33 43 2c 24 31 32 46 |NLINE $3|03C,$12F|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.